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PREFACE 



This publication is intended as a guide for 
the programmer using, the assembler language 
and its features. It contains »all the 
information needed by the programmer to 
code an assembler-language program on the 
coding form. The information needed by the 
programmer to code user macro definitions 
(for inclusion into the macro library) is 
presented in the macro-definition language 
publication as listed on the cover of this 
publication. 

The material in this publication is 
presented assuming that the reader has had 
experience with computer systems and has 



background in the basic programming 
concepts and technigues (or has completed 
basic courses of instruction in these 
areas) . The publication IB M System/360 
Principles, of Operation (Form A22-6821) 
supplies the necessary background 
information about IBM System/360 operations 
(particularly storage addressing, data 
formats, and machine-instruction formats 
and functions) . The publication IBM - 
System/360 Ba sic Operating System, 
Pro grammer's Guide (Form C2 4-3 372) supplies 
the necessary background information about 
IBM System/360 programming using Basic 
Operating System. 
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INTRODUCTION 



Computer programs may be expressed in 
machine language, i.e., language directly 
interpreted by the computer, or in a 
symbolic language, which is much more 
meaningful to the programmer. The symbolic 
language, however must be translated into 
machine language before the computer can 
execute the program. This function is 
accomplished by an associated processing 
program. 

Of the various symbolic programming 
languages, assembler languages are closest 
to machine language in form and content. 

The assembler language discussed in this 
manual is a symbolic programming language 
for the IBM System/360. It enables the 
programmer to use all IBM System/360 
machine functions, as if he were coding in 
System/360 machine language. 

The Assem bler translates or processes 
assembler-language programs into machine 
language for execution by the computer. 
The program written in the assembler 
language used as input to the Assembler is 
called the sou r ce pro g ram ; the 
machine-language program produced as output 
from the Assembler is called the object 
program. The translation or processing 
procedure performed by the Assembler to 
produce the object program is called 
assembling . Often, as in this publication, 
the object program produced is also 
referred to as an assembly * 

Compatibilit y 

The System/360 Basic Operating System 
Assembler can assemble programs written in 
the Basic Programming Support (8K Card) 
assembler language or the Basic Programming 
Support (8K Tape) assembler language. It 
can also assemble programs written for the 
Assembler of the 7090/7094 Support Package 
for the IBM System/360. The System/360 
Basic Operating System Assembler reguires 
the EBCDIC punches for the + • ( ) and = 
signs. 

Any program written in the IBM 
System/360 Basic Operating System assembler 
language can be assembled by the System/360 
Operating System Assembler (provided the 
necessary macros are in the Macro library) 
and the System/360 Basic Programming 
Support Assembler with the following 
exceptions: 

1. The XFR assembler instruction is 
considered an invalid mnemonic 



operation code by System/360 Operating 
System Assemblers and System/360 Disk 
and Tape Operating System Assemblers. 
2. The assignment, size, and ordering of 
literal pools may differ among the 
assemblers. 



ASS EMBLER-LANGUAGE STATEMENTS 

Program statements (source statements) 
written in assembler language may consist 
of: a name to identify the statement; a 
symbolic operation code .(m nemonic) to 
identify the function the statement 
represents; and an operand, consisting of 
one or more items called operands, to 
designate the data or storage locations 
used in the operation, and space for 
comments. 

Assembler-language programs may consist 
of up to four types of statements: 
machine-instruction, macro-instruction, and 
assembler-instruction, and comments 
statements. 

Machine-instruction statements are 
one-for-one symbolic representations of 
System/360 machine instructions. The 
Assembler produces an eguivalent machine 
instruction in the object program from each 
machine-instruction statement in the source 
program. 

Macro-instruction statements cause the 
Assembler to retrieve a specially-coded 
symbolic routine from the macro library, 
modify the routine according to the 
information in the macro instruction, and 
insert the modified routine into the source 
program for translation into machine 
language. IBM supplies specially-coded 
input/output (I/O) routines as part of the 
macro library. The assembler language 
includes a set of I/O macro-instruction 
statements through which these routines can 
be retrieved and modified to suit 
particular needs for input or output. 
Also, the user can define his own library 
routines, and reference them through 
macro-instruction statements he defines 
himself. These routines and statements are 
defined according to a special language, 
the macro-definition language, and are 
processed by the Assembler in the same 
manner as the IBM I/O routines and 
macro-instruction statements. The 
macro-definition language is presented in 
the macro-definition language publica- 
tion, as listed on the front cover of this 
publication. 
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The Assembler program, in addition to 
its translation function, provides 
auxiliary functions that assist the 
programmer in checking and documenting 
programs, in controlling storage-address 
assignment, in program sectioning and 
linking, in data and storage-field 
definition, and in controlling the 
Assembler program itself. 
Assembler-instruction statements specify 
these auxiliary functions to be performed 
by the Assembler, and, with a few 
exceptions, do not result in the generation 
of any machine-language code by the 
Assembler. 

Predefined mnemonic codes are provided 
in the assembler language for all 
machine- instruction, assembler-instruction, 
and IBM-supplied I/O macro-instruction 
statements. Additional extended mnemonics 
are provided for the various forms of the 
Branch-on-Condition machine instruction. 

The assembler language provides for the 
symbolic representation of any addresses, 
machine components (such as registers) , and 
actual values needed in source statements. 
Also provided is a variety of forms of data 
representation . 



PROGRAMMER AIDS 

The assembler program provides auxiliary 
functions that assist the programmer in 
checking and documenting programs, in 
controlling address assignment, in 
segmenting a program, in data and symbol 
definition, in generating 

macro- instructions, and in controlling the 
assembly program itself. Mnemonic codes, 
specifying these functions are provided in 
the language. 

Var iety in Dat a Representation : Decimal, 
binary, hexadecimal, or character 
representation of machine-language binary 
values may be employed by the programmer in 
writing source statements. The programmer 
selects the representation best suited to 
his purpose. 

Base - Re g ister A ddress Calculatio n: As 
discussed in the IBM System/36t) Principles 
of Operation manual, the System/360 
addressing scheme requires the designation 
of a base register (containing a base 
address value) and a displacement value in 
specifying a storage location. The 
assembler assumes the clerical burden of 
calculating storage addresses in these 
terms for the symbolic addresses used by 
the programmer. The programmer retains 
control of base register usage and the 
values entered therein. 



Re l ocatability : The object programs 
produced by the assembler are in a format 
enabling relocation from the originally 
assigned storage area to any other suitable 
area. 



Sectioning and Linking : The assembler 
language and program provide facilities for 
partitioning an assembly into one or more 
parts called c ontrol sec tions . Control 
sections may be added or deleted when 
loading the object program. Because 
control sections do not have to be loaded 
contiguously in storage, a sectioned 
program may be loaded and executed even 
though a continuous block of storage large 
enough to accommodate the entire program 
may not be available. 

The linking facilities of the assembler 
language and program allow symbols to be 
defined in one assembly and referred to in 
another, thus effecting a link between 
separately assembled programs This permits 
reference to data and/or transfer of 
control between programs A discussion of 
sectioning and linking is contained in 
Program Sectioning and Linking . 

Program Listings : A listing of the source 
program statements and the resulting object 
program statements is produced by the 
assembler for each source program it 
assembles. The programmer can partly 
control the form and content of the 
listing. 

Error Indications : As a source program is 
assembled, it is analyzed for actual or 
potential errors in the use of the 
assembler language. Detected errors are 
indicated in the program listing. 



IBM BASIC OPERATING SYSTEM/3 60 
REL ATIONSHIPS 

The Assembler program operates as a part of 
the 8K disk resident version of the IBM 
System/360 Basic Operating System. The 
Assembler runs under control of the 
Supervisor, which provides the Assembler 
with all input/output and interruption 
services needed in assembling a source 
program. The object programs produced also 
operate as part of the disk resident system 
and make use of the functions provided by 
the resident control programs. For special 
applications not reguiring disk, an 
independent Supervisor can be produced to 
control object programs outside of the 
Basic Operating System environment. Such 
independent programs do not include disk 
storage processing capability. 
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MACHINE REQUIREMENTS 

To perform an assembly, the Assembler 
program requires a System/360 with at least 
the following features and units: 

8,192 bytes of main storage. Additional 
main storage would be used by the 
Assembler to allocate area for 
input/output buffers and Assembler 
tables whenever they are needed. 

The Assembler requires a 16K system 
if the size of the Supervisor exceeds 
4,096 bytes of main storage. 

Standard instruction set. 

Either one multiplexor or one selector 
channel . 

One IBM 2311 Disk Storage Drive. The 
following system programs must be 
present in the resident disk pack: 
IPL Loader, Supervisor, Job Control, 
Assembler, and Macro Library routines 
for all macros issued. At least one 
disk workarea must be provided. For 
faster processing, an additional disk 
drive can be used to split the 
Assembler workarea. See AWORK 
(Ass embler. Workfile) Cards. 

One reader IBM 1442, 2501, 2520 (Model 
A1 or B1), 2540 or 2400-series tape 
unit.* This device may be the same I/O 
unit used for punching the output 
deck. 

One punch IBM 1442, 2520, 2540, or 
2400-series tape unit* (if the 
Assembler output deck is to be 
punched) . This device may be the same 
I/O unit used for reading the source 
deck. 

One printer IBM 1403, 1404, 1443, or 

2400-series tape unit* (if the program 
listing is to be printed) . 

*At least one IBM 2400-series magnetic 
tape unit is reguired 'for any of the 
following conditions: 

1. If the source program is to be read 
from tape. 

2. If the output deck from the Assembler 
is to be written on tape. 

3. If the program listing is to be 
written on tape. 

A second tape unit is reguired if both 
the output deck and the program listing are 



to be written on tape. (See Figure 55 for 
7-track tape requirements.) 

An IBM 2400-series magnetic tape unit 
may be used for source input or object 
program output, only if sufficient main 
storage is available. See the Basic 
Operating System Pr o grammer 1 s Guide for 
information relating to main storage 
requirements when tape is used. 

If an IBM 1052 Printer-Keyboard is 
available, it may be used for the output of 
special diagnostic messages. 

To execute object programs, the minimum 
machine reguirements are a System/360 with 
at least the following features and units. 

8,192 bytes of main storage (except BSC 
applications, which require 16,384 bytes of 
main storage) . 

Standard instruction set. 

Either one multiplexor or one selector 
channel. 

One IBM 2311 Disk Storage Drive. 

One Card Read-Punch (1442 or 2540 or 
2501 and 2520) . 

Data Conversion special feature, if 

variable-length records are written on 
7-track tape. 

Additional units as reguired by the 
object program. 

There are two basic approaches to a 
minimum resident system: 

1. Problem program (s) that reside on the 
disk resident pack with the data to be 
processed must have: 

a. IPL Loader. 

b. Supervisor. 

c. Job Control. 

d. Appropriate problem program(s) . 

2. Problem program (s) that are loaded by 
means of a card reader must have: 

a. Items a-c above. 

b. Disk Linkage Editor. 

A full description of the disk residence 
functions and the operating system 
environment is explained in detail in IBM 
System/360 Basic Operating System 
Programmer's Guid e, C24-3372. 

For the single drive system, these 
residence reguirements must reside on each 
pack. 
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GENERAL - INFORMATION 



This section presents information about 
assembler language coding conventions, and 
assembler source statement structure. 



ASSEMBLE R LA NG UAGE CODING CONVENTION S 

This subsection discusses the general 
coding conventions associated with use of 
the assembler language. 

Coding Form 

A source program is a sequence of source 
statements that are punched into cards. 
These statements may be written on the 
standard coding form, X28-6509 (Figure 1) r 
provided by IBM. One line of coding on the 
form is punched into one card. The 
vertical columns on the form correspond to 
card columns. 

Space is provided at the top of the form 
for program identification. Instructions 
to the keypunch operator can also be given; 
any character code that does not have a 
corresponding printer graphic can be 
assigned any special graphic to identify 
the code to the keypunch operator, who can 
then punch the corresponding card punch 
code wherever he encounters the special 
graphic. (See C hara ct er Set for the 
presentation of the valid character codes 
that can be used in a source program.) 
Neither the program information (Program, 
Programmer, Date, etc.) nor the 
instructions to the keypunch operator are 
punched into a card; they are for the 
user's own use. 

The body of the form (Figure 1) is 
composed of two fields: the statement 
field, columns 1-71, and the 
identification-sequence field, columns 
73-80. The identif ication-seguence field 
is not part of a statement and is discussed 
following the subsection Statement F ormat. 

The entries (i.e., coding) composing a 
statement occupy columns 1-71 of a 



statement line and, if needed, columns 
16-71 of a single continuation line. 

Con tinuation - Lines ; When it is necessary 
to continue a statement on another line the 
following rules apply. Note that only one 
continuation line is permitted per 
statement. 

1. Enter any nonblank character in column 
72 of the statement line. This 
character must not be part of the 
statement coding. For a positional 
macro, there should be no blanks in the 
operand to the left of column 72. 

2. Continue the statement on the next 
line, starting in column 16. All 
columns to the left of column 16 wili 
be ignored. 



Statement Boundarie s 

Source statements are normally contained in 
columns 1- — 71 of statement lines and 
columns 16—71 of any continuation lines. 
Therefore, columns 1, 71, and 16 are 
referred to as the "begin," "end," and 
"continue" columns, respectively This 
convention may be altered by the Input 
Format Control (ICTL) assembler instruction 
discussed later in this publication The 
continuation character, if used, always 
immediately follows the "end" column. 

Statement Format 

Statements may consist of one to four 
entries in the statement field. They are, 
from left to right: a name entry, an 
operation entry, an operand entry, and a 
comments entry. These entries must be 
separated by one or more blanks, and must 
be written in the order stated. 

The coding form (Figure 1) is ruled to 
provide an eight-character name field, a 
five-character operation field, and a 
56-character operand and/or comments field. 
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If desired, the programmer may disregard 
these boundaries and write the name, 
operation, operand, and comment entries in 
other positions, subject to the following 
rules. 

1 . The entries must not extend beyond 
statement boundaries (either the 
conventional boundaries or as 
designated by the programmer via the 
ICTL instruction) . 

2. The entries must be in proper 
sequence, as stated above. 

3. The entries must be separated by one 
or more blanks. 

4. If used, a name entry must be written 
starting in the begin column. 

5. The name and operation entries must be 
completed in the first line of the 
statement, including at least one 
blank following the operation entry. 

A description of the name, operation, 
operand, and comments entries follows: 

Nam e Entries : The name entry is a symbol 
created by the programmer to identify a 
statement. A name entry is optional. The 
symbol must consist of eight characters or 
less, and be entered with the first 
character appearing in the begin column. 
If the begin column is blank, the assembler 
program assumes no name has been entered. 
No blanks may appear within the symbol. 

Oper ation Entr ies: The operation entry is 
the mnemonic operation code specifying the 
machine operation or assembler functions 
desired. An operation entry is mandatory 
and must appear in the first statement 
line, starting at least one position to the 
right of the begin column. Valid mnemonic 
operation codes for machine and assembler 
operations are contained in Appendixes B 
and C of this publication. Valid operation 
codes consist of five characters or less. 
No blanks may appear within the operation 
entry. 

Operand Entries : Operand entries are the 
coding that identifies and describes data 
to be acted upon by the instruction, by 
indicating such things as storage 
locations, masks, storage-area lengths, or 
types of data. 

Depending on the needs of the 
instruction, one or more operands may be 
written. Operands are required for all 
machine instructions. 

Operands must be separated by commas and 
no blanks must intervene between operands 
and the commas that separate them. 



Symbols can appear in the operand field 
of a statement. Symbols that appear in the 
operand field must be defined. A symbol is 
considered to be defined when it appears in 
the name field of a statement. 



The operands may not contain embedded 
blanks except as follows: 



If character representation is 
used to specify a constant, a 
literal, or immediate data in an 
operand, the character string may 
contain blanks, e.g., CAB D'» 



Com ments Entries : Comments are descriptive 
items of information about the program that 
are to be inserted in the program listing. 
All valid characters (see Chara cter Se t in 
this section) , including blanks may be used 
in writing a comment. The entry cannot 
extend beyond the end column (normally 
column 7 1), and a blank must separate it 
from the operand. 



An entire line may be used for a comment 
by placing an asterisk in the begin column. 
Extensive comments entries may be written 
by using a series of lines with an asterisk 
in the begin column of each line or by 
using the aforementioned continuation line. 



In statements where an optional operand 
entry is omitted but a comments entry is 
desired, the absence of the operand entry 
must be indicated by a comma preceded and 
followed by one or more blanks, as follows 



f 

| Name 


■ i — ■ - 
| Operation 

— 1 


T I 

|Operand | 


I 

I 

i 


| END 

_.L, ., 


H 1 

| COMMENT | 
.±_ _ .... j 



Statement Example : The following example 
illustrates the use of name, operation, 
operand, and comments entries. A compare 
instruction has been named by the symbol 
COMP; the operation entry (CR) is the 
mnemonic operation code for a 
register-to-register compare operation, and 
the two operands (5,6) designate the two 
general registers whose contents are to be 
compared. The comments entry reminds the 
programmer that he is comparing "new sum" 
to "old" with this instruction. 



1 

| Name 

1 


| Operation 
H 


T 1 

| Operand | 
—i 1 


|COMP 
■ 


| CR 
• 


| 5, 6 NEW SUM TO OLD | 
i ~ i 
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Identification-S equ ence Field 

The" identification-sequence field of the 
codinq form (columns 73-80) is used to 
enter proqram identification and/or 
statement sequence characters. The entry 
is optional. If the field, or a portion of 
it, is used for proqram identification, the 
identification is punched by the user in 
the statement cards, and reproduced by the 
Assembler in the printed listinq of the 
source proqram. 



To aid in keepinq source statements in 
order, the proqrammer may code an ascendinq 
sequence of characters in this field or a 
portion of it. These characters are 
punched into their respective cards, and, 
durinq assembly, the proqrammer may request 
the assembler to verify this sequence by 
the Input Sequence Checkinq (ISEQ) 
assembler instruction, which is discussed 
un de r Program Co ntrol Instructions . 



Summ ary of Statem ent For mat 

The entries in a statement must always be 
separated by at least one blank and must be 
in the following order: name, operation, 
operand (s), comment. 



Every statement, with the exception of 
the comments statement, requires an 
operation entry. Name and comment entries 
are optional. Operand entries are required 
for all machine instructions and most 
assembler instructions. 



The name and operation entries must be 
completed in the first statement line, 
includinq at least one blank following the 
operation entry. 



The name and operation entries must not 
contain blanks. Operand entries must not 
have a blank- precedinq or. followinq the 
commas that separate them. 



A name entry must always start in the 
"beqin" column. 



If the column after the end column is 
blank, the next line must start a new 
statement. If the column after the end 
column is not blank, the followinq line 
will be treated as a continuation line. 



All entries must be contained within the 
desiqnated beqin, end, and continue column 
boundaries. 



Cha racter Set 

Assembler-Lanquaqe statements may be 
written usinq the followinq letters, 
numeric diqits, and special characters: 

Letters: 29 characters are classified 
as letters. These include 
the characters a, #, and $ as 
well as the alphabetic 
characters A throuqh Z. The 
three additional characters 
are included so that the 
cateqory can accommodate 
certain non-Enqlish 
lanquaqes. 

Numeric Diqits: 0 throuqh 9 



Special Characters: + - , = . * ( ) ' / 
& blank 

These letters, diqits, and special 
characters are only 51 of the set of 256 
code combinations defined as the Extended 
Binary Coded Decimal Interchanqe Code 
(EBCDIC) . Each of the 256 codes (includinq 
the 51 characters above) has a unique card 
punch code. Most of the terms used in 
Assembler-Lanquaqe statements are expressed 
by the letters, diqits, and special 
characters shown above. However, such 
Assembler- lanquaqe features as character 
self-def ininq terms and character constants 
permit the use of any of the 256 card 
codes. Appendix A shows the various forms 
of EBCDIC codes. 



ASSEMBLER-LANGUAGE STRUCTURE 

The basic structure of the lanquaqe can be 
stated as follows. 

A source statement is composed of: 

• A name entry (optional) . 

• An operation entry (mandatory) . 

• An operand entry (usually required) . 
A name entry is: 

• A symbol. 

An operation entry is: 

• A mnemonic operation code representinq 
a machine-, assembler-, or 
macro-instruction. 

An operand entry is: 

• One or more operands composed of one or 
more expressions, which, in turn, are 
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composed of a term or an arithmetic 
combination of terms. 

Operands of machine instructions 
generally represent such things as storage 
locations, general registers, immediate 
data, or constant values. Operands of 
assembler instructions provide the 
information needed by the assembler program 
in order to perform the designated 
operation. 

Figure 2 depicts this structure. Terms 
shown in Figure 2 are classed as absolute 
or relocatable. Terms are absolute or 



relocatable due to the effect of program 
relocation upon them. Program relocation 
is the loading of the object program into 
storage locations other than those 
originally assigned by the assembler 
program. A term is absolute if its value 
does not change upon relocation. A term is 
relocatable if its value changes by n-when 
the program is relocated n bytes away from 
its assembled location. 



The following subsection, Terms - and 
Expr essions , discusses these items as 
outlined in Figure 2. 



Name 



Operation 



Operand 



A Symbol 



LEGEND: 



Mnemonic Operation Code 

machine instruction Op-code 

— assembler instruction Op-code 

— macro instruction Op-code 



AT = absolute term 

RT = relocatable term 

+ = addition 
= subtraction 

/ = division 

* = multiplication (or the 

Location Counter reference, 
depending on the context) 



Operand, . . ., Operand, . . . 

— Expression 

-Term 



— Expression (Expression) 

-—Expression (Expression, Expression) 
Figure 2. Assembler Language Structure — Machine and Assembler Instructions 



— Symbol (either AT or RT), e.g., BETA1 

— Self-defining term (AT) 

— decimal, e.g., 91 

— hexadecimal, e.g., X'5B' 
binary, e.g., B'Ol 011011' 

— character, e.g., C'$' 

Location Counter reference (RT), e.g., * 

— Literal (RT), e.g., = F'91' 



— Symbol length attribute reference 
(AT), e.g. L'BETAl 

•Arithmetic combination of terms 
± 

— AT * AT, e.g., L'BETAl * 10 
+ + 

-AT* AT * AT, e.g., 5*X'5B'-1 

— RT ± AT, e.g., BETA1+10 
+ 

I — RT ± AT ? AT, e.g., *+10/2 
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TERMS AND EXPRESSIONS 



256B (first character is not 

alphabetic) 



TERMS 

All terms represent a value. This value 
may be assigned by the assembler program 
(symbols, symbol length attribute location 
counter reference, literals) or may be 
inherent in the term itself (self-defining 
terms) . 

An arithmetic, combination of terms is 
reduced to a single value by the assembler 
program. 

The following material discusses each 
type of term arid the rules for its use. 



REC0RDAREA2 (more than eight characters) 

BCD*34 (contains a special character 

- *) 

IN AREA (contains a blank) 

Note i Any of several different 
combinations of characters can be installed 
in a printer. If the characters $, #,. and 
a are not included, either a blank space 
will occur or a different character will be 
printed when the code for one of these 
characters is sensed. This varies with the 
print arrangement that is used. 



Symb ols 

A symbol is a character or combination of 
characters used to represent addresses or 
arbitrary values. 

Symbols, through their use as names and 
in operands, provide the programmer with an 
efficient way to name and reference a 
program element. A symbol, created by the 
programmer for use as a name entry and in 
an operand, must conform to these rules: 

1. The symbol must not consist of more 
than eight characters. The first 
character must be a letter. The other 
characters may be letters, digits, or a 
combination of the two. 

2» No special characters may be included 
in a symbol. 

3. No blanks are allowed in a symbol. 

4. Symbols used by IOCS begin with the 
letter I. Therefore,, user symbols in 
the problem program should not begin 
with the letter I. Also, a symbol or 
the first portion of a symbol (up to 
seven characters) in the problem 
program should not be the same as the 
file name in a DTP header entry, except 
when referring to that file in an IOCS 
macro instruction. 

5. If a Supervisor is being assembled with 
a problem program, user symbols shoul d 
not start with SYS because symbols used 
by the Supervisor start with SYS. 

The following are valid symbols: 

READER L00P2 $13 

A23456 N SPRICE 

X4F2 SU #LB1 

The following symbols are invalid, for 
the reasons noted: 



DEFININ G - SYMBOLS : The assembler program ^ 
assigns a value to each symbol appearing "as 
a name entry in a source statement. The 
value assigned to symbols naming storage 
areas, instructions, constants, and control 
sections represents the address of the 
leftmost byte of the storage field 
containing the named item. Since the 
addresses of these items may change upon 
program relocation, the symbols naming them 
are considered relocatable terms. 

Symbols used as name entries in the 
Equate Symbol (EQU) assembler instruction 
are assigned the value designated in the 
operand entry of the instruction. Since 
the operand entry may represent a 
relocatable value or an absolute (i.e., 
nonchanging) value, the symbol is 
considered a relocatable term or an 
absolute term depending upon the value to 
which it is eguated. 

The value of a symbol may not be 
negative and may not exceed 2 24 -1. 

A symbol is said to be defined when it 
appears as the name of a source statement. 
(A special case of symbol definition is 
discussed in Program Sectioning - and 
Linking . ) 

Symbol definition also involves the 
assignment of a length attribute - to the 
symbol. (The assembler program maintains 
an internal table — the symbol table — in 
which the values and attributes of symbols 
are kept. When the assembler program 
encounters a symbol in an operand, it 
refers to the table for the values 
associated with the symbol.) The length 
attribute of a symbol is the size, in 
bytes, of the storage field whose address 
is represented by the symbol. For example, 
a symbol naming an instruction that 
occupies four bytes of storage has a length 
attribute of four. 
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PREV-IOUSLY DEFINED SYMBOLS : Some 
instructions require that a symbol 
appearing in the operand entry be 
previously defined. This simply means that 
the symbol, before it is used in an 
operand, must have appeared as a name entry 
in a prior statement. 

GENERAL RESTRICTIONS ON SYMBOLS: A symbol 
may be defined only once in an assembly. 
That is, each symbol used as the name of a 
statement must be unique to that assembly. 
However, a symbol may be used in the name 
field more than once as a control section 
name (i.e., defined in the START, CSECT, or 
DSECT assembler statements described in 
Add ressing — Progra m Sectioning and 
Linking) because the coding of a control 
section may be suspended and then resumed 
at any subsequent point. The CSECT or 
DSECT statement that resumes the section 
must be named by the same symbol that 
initially named the section; thus, the 
symbol that names the section must be 
repeated. Such usaqe is not considered to 
be duplication of a symbol definition. 

Self- Defining Terms 

A self-defining term is one whose value is 
inherent in the term. It is not assigned a 
value by the assembler program. For 
example, the decimal self-defining term — 
15 — represents a value of fifteen. 

There are four types of self-defining 
terms: decimal, hexadecimal, binary, and 
character. Use of these terms is spoken of 
as decimal, hexadecimal, binary, or 
character representation of the machine 
language binary value or bit configuration 
they represent. 

Self-defining terms are classed as 
absolute terms since the value they 
represent does not change upon program 
relocation. 

USING SELF-DEFINING TERMS: Self -defining 
terms are the means of specifying machine 
values or bit configurations without 
equatinq the value to a symbol and usinq 
the symbol. 

Self-def ininq terms may be used to 
specify such proqram elements as immediate 
data, masks, reqis.ters, addresses, and 
address increments. The type of term 
selected (decimal, hexadecimal, binary, or 
character) will depend on what is being 
specified. 

The use of a self-defining term is quite 
distinct from the use of data constants or 
literals. When a self-defining term is 
used in a machine- instruction statement, 
its value is assembled into the 
instruction. When a data constant or 



literal is specified in the operand of an 
instruction, its address is assembled into 
the instruction 



Decimal Self-Defining Term : A decimal term 
is simply an unsigned decimal number 
written as a sequence of decimal diqits. 
Hiqh-order zeros may be used (e.g. ,007). 
Limitations on the value of the term depend 
on its use. For example, a decimal term 
that designates a general register should 
have a vaiue between 0 and 15 inclusively; 
one that represents an address should not 
exceed the size of storage. In any case, a 
decimal term may not consist of more than 
eight digits, or exceed 1 6,777, 215 (2 2 *- 1) . 
A decimal term is assembled as its binary 
equivalent Some examples of decimal 
self-def ininq terras are: 8, 147, 4092, 
00021. 

Hexadecimal Self-Defining Term : A 
hexadecimal self-defining term is an 
unsigned hexadecimal number written as a 
sequence of hexadecimal diqits. The diqits 
must be enclosed in sinqle quotation marks 
and preceded by the letter X; for example, 
X'C49' . 

Each hexadecimal diqit is assembled as 
its four-bit binary equivalent. Thus, a 
hexadecimal term used to represent an 
eiqht-bit mask would consist of two 
hexadecimal diqits. The maximum value of a 
hexadecimal term is X ' FFFFFF ' . 

The hexadecimal diqits and their bit 
patterns are as follows: 

0- 0000 4- 0100 8- 1000 C- 1100 

1- 0001 5- 0101 9- 1001 D- 1101 

2- 0010 6- 0110 A- 1010 E- 1110 

3- 0011 7-0111 B- 1011 F- 1111 

A table for convertinq from hexadecimal 
representation to decimal representation is 
provided in Appendix E. 

Binary Self-Definin g T erm : A binary 
self-defining term is written as an 
unsigned sequence of 1s and 0s enclosed in 
sinqle quotation marks and preceded by the 
letter B, as follows: B'10001101«. This 
term would appear in storage as shown, 
occupying one byte. A binary term may have 
up to 24 bits represented. 

Binary representation is used primarily 
in desiqnatinq bit patterns of masks or in 
loqical operations. 

The followinq example illustrates a 
binary term used as a mask in a Test Under 
Mask (TM) instruction. The contents of 
GAMMA are to be tested, bit by bit, aqainst 
the pattern of bits represented by the 
binary term. 
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I 1 1 

|Name |Operaticn |Operand 



| ALPHA | TM 
i 1 



| GAMMA, B' 10101101' | 
j 1 



Char acter Self-Defining Term : A character 
self-defining 'terra consists of one to three 
characters enclosed by single quotation 
marks. It may be preceded by the letter C 
(this is not mandatory) . All letters, 
decimal digits, and special characters may 
be used in a character term. In addition, 
any of the 256 punch combinations (shown in 
Ap pen dix- A ) may be designated in a 
character self-defining term. Examples of 
character self-defining terms are as 
follows (the letter C preceding the 
guotation mark is optional) : 



C'/» 

C ABC 



C • (blank) 
C 13 ' 



Because of the use of guotes in the 
assembler language and ampersands in the 
macro language as syntactic characters, the 
following rule must be observed when using 
these characters in a character term. 

For each single guotation mark or 
ampersand desired in a character term, two 
single quotation marks or ampersands must 
be written. For example, the character 
value A'# would be written as 'A 1 '*', while 
a single quotation mark followed by a blank 
and another single guotation mark would be 
written as » » » 1 ' • . 

Each character in the character sequence 
is assembled as its eight-bit code 
equivalent (see Appendix - A ) . The two 
quotation marks or ampersands that must be 
used to represent a single quotation mark 
or ampersand within the character sequence 
are assembled as a single guotation mark or 
ampersand. 

Location Counter Reference 

The programmer may refer to the -current 
value of the Location Counter at any place 
in a program, by using an asterisk in an 
operand. The asterisk represents the 
location of the first byte of currently 
available storage (i.e., after any reguired 
boundary adjustment) . Using an asterisk in 
a machine-instruction statement is the same 
as placing a symbol in the name field of 
the statement and then using that symbol as 
an operand of the statement Because a 
Location Counter is maintained for each 
control section, a Location Counter 
reference designates the Location Counter 
for the section in which the reference 
appears. 

A reference to the Location Counter may 
be made in a literal address constant 



(i.e., the asterisk may be used in an 
address constant specified in literal 
form) . The address of the instruction 
containing the literal is used for the 
value of the Location Counter. A Location 
Counter reference may not be used in a 
statement which reguires the use of a 
predefined symbol, with the exception of 
the EQU and ORG assembler instructions. 



The Location Counte r; A Location Counter 
is used to assign storage addresses to 
program statements. It is the assembler 
program's equivalent of the instruction 
counter in the computer. As each machine 
instruction or data area is assembled, the 
Location Counter is first adjusted to the 
proper boundary for the item, if adjustment 
is necessary, and then incremented by the 
length of the assembled item. Thus, it 
always points to the next available 
location. If the statement is named by a 
symbol, the value attribute of the symbol 
is the value of the Location Counter after 
boundary adjustment, but before addition of 
the length. 

The assembler maintains a Location 
Counter starting at a double-word boundary 
for each control section of the program and 
manipulates each Location Counter 
independently as previously described. 
Source statements for each section are 
assigned addresses from the Location 
Counter for that section The Location 
Counter for each successively declared 
control section assigns locations in 
consecutively higher areas of storage. 
Thus, if a program has multiple control 
sections, all statements identified as 
belonging to the first control section will 
be assigned from the Location Counter for 
section 1, the statements for the second 
control section will be assigned from the 
Location Counter for section 2, etc. This 
procedure is followed whether the 
statements from different control sections 
are interspersed or written in control 
section seguence. 

The Location Counter setting can be 
controlled by using the START and ORG 
assembler instructions, which are described 
in Addressing — Program- Sectioning- and 
Linking . The counter affected by either of 
these assembler instructions is the counter 
for the control section in which they 
appear. Maximum value for the Location 
Counter is 2 24 -1. 



Literals 

A literal term is one of three basic ways 
to introduce data into a program. It is 
simply a constant preceded by an equal sign 
(=). 
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A literal represents da 
reference to data. The ap 
literal in a source stat<em 
assembler program to assem 
specified by the literal, 
in a "literal pool", and p 
of the storage field conta 
in the operand field of th 
source statement. 



ta rather than a 
pearance of a 
ent directs the 
ble the value 
store this value 
lace the address 
ining the. value 
e assembled 



Literals provide a means of 
constants (such as numbers for 
addresses, indexing factors, o 
phrases for printing out a mes 
program by specifying the cons 
operand of the instruction in 
used. This is in contrast to 
assembler instruction to enter 
into the program, and then usi 
of the DC instruction in the o 
one literal is allowed in a 
machine- instruction statement. 



entering 
calculation 
r words or 
sage) into a 
tant in the 
which it is 
using the DC 

the data 
ng the name 
perand. Only 



A literal term may not be combined with 
any other terms. 

A literal may not be changed in storage. 
That is, it may not be used as the 
receiving field of an instruction that 
modifies storage. 

A literal may not be specified in a 
constant (see D C — Defi ne C onstant ) or any 
other Assembler instruction. 

The instruction coded below shows one 
use of a literal. 



|Name |Operation |Operand 



I +-- 

| GAMMA |L 



Literal Format ; The ass 
description of the type 
specified as well as the 
This descriptive informa 
assembler in assembling 
correctly The descripti 
literal must indicate th 
the constant is to be as 
also specify the length 
occupy. 



embler reguires a 
of literal being 
literal itself, 
tion assists the 
the literal 
ve portion of the 
e format in which 
sembled. It may 
the constant is to 



The method of describing and specifying 
a constant as a literal is nearly identical 
to the method of specifying it in the 
operand of a DC assembler instruction. The 
major difference is that the literal must 
start with an egual sign (=), which 
indicates to the assembler that a literal 
follows. The reader is referred to the 
discussion of the DC assembler instruction 
operand format Ad dressing -— Program 
Sectionin g and Linking for the means of 
specifying a literal. All types of address 
constants, except S-type address constants, 
can be expressed as literals. Some 
examples of literals are: 



=A (BETA) 

=C 1 ABC 1 
=CL7'PAGE' 



address constant literal, 
a fixed-point number with 
a length of four bytes, 
a character literal, 
an explicit length literal, 



| 10, =F »274 ' 



J-. 



The Literal P ool : The literals processed 
by the assembler are collected and placed 
in a special area called the literal pool, 
and the location of the literal, rather 
than the literal itself, is assembled in 
the statement employing a literal. The 
positioning of the literal pool may be 
controlled by the programmer, if he so 
desires. Unless otherwise specified, the 
literal pool is placed at the end of the 
first control section. 



The statement GAMMA is a load 
instruction using a literal as the second 
operand. When assembled, the second 
operand cf the instruction will be the 
address at which the binary value 
represented by F'274' is stored. 

In general, literals may be used 
wherever a storage address is permitted as 
an operand. They may not, however, be used 
in any assembler instruction that requires 
the use cf a previously defined symbol. 
Literals are considered relocatable 
because the address of the literal rather 
than the literal itself, will be assembled 
in the statement that employs a literal. 
The assembler generates the literals, 
collects them, and places them in a 
specific area of storage as explained in 
the subsection The L i teral Pool . A literal 
is not to be confused with the immediate 
data in an SI instruction. Immediate data 
is assembled into the instruction. 



The programmer may also specify that 
multiple literal pools be created. 
However, the seguence in which literals are 
ordered within the pool is controlled by 
the assembler. Further information on 
positioning the literal pool (s) is under 
LTORG — Begin Litera l Po ol . 

Sym bol Length Attri b ute R e fere nce 

The length attribute of a symbol may be 
used as a term. Reference to the attribute 
is made by coding L' followed by the 
symbol, as in: 

L 1 BETA 

The length attribute of BETA will be 
substituted for the term. The following 
example illustrates the use of L' symbol in 
moving a character constant into either the 
high-order or low-order end of a storage 
field. 
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For ease in following the example, the 
length attributes of A1 and B2 are 
mentioned. However, keep in mind that the 
L' symbol term makes coding such as this 
possible in situations where lengths are 
unknown. 



| Name 
| 


T 1 

| Operation 


i - , 

JOperand | 


I A 1 

|B2 

IHIORD 

ILOORD 
i 


H 

IDS 
|DC 
IMVC 

|MVC 
i 


-+ 1 

|CL8 | 
|CL2«AB» | 
|A1 (L*B2) ,B2 | 
|A1+L'A1-L'B2(L'B2),B2| 
» • 



A1 names a storage field eight bytes in 
length and is assigned a length attribute 
of eight. B2 names a character constant 
two bytes in length and is assigned a 
length attribute of two. The statement 
named HIORD moves the contents of B2 into 
the leftmost two bytes of A1. The term 
L'B2 in parentheses provides the length 
specification reguired by the instruction. 
When the instruction is assembled, the 
length is placed in the proper field of the 
machine instruction. 

The statement named LOORD moves the 
contents of B2 into the right- most two 
bytes of A1. The combination of terms 
A1+L'A1-L'B2 results in the addition of the 
length of A1 to the beginning address of 
A1 , and the subtraction of the length of B2 
from this value. The result is the address 
of the seventh byte in field A1. The 
constant represented by B2 is moved into A1 
starting at this address. L'B2 in 
parentheses provides length specification 
as in HIORD. 



combination with another term, it first 
reduces the combination of terms inside the 
parentheses to a single value. This value 
then is used in reducing the rest of the 
expression to another single value. 

Certain fixed rules determine the ways 
in which terms can be combined. These 
rules are discussed under Absolute and 
Relocatable Expressions . In addition to 
these, the following general rules can be 
stated for coding any expressions: 

1. An expression may not start with an 
arithmetic operator (+-/*) . Therefore, 
the expression -A+BETA is invalid. 
However, the expression 0- A+BETA is 
valid. 

2. An expression may not contain two terms 
or two operators in succession. 

3. An expression may not consist of more 
than 3 terms. 

4. An expression may not have more than 
one pair of parentheses. 

5. A multiterm expression may not contain 
a literal. 

The following are examples of valid 
expressions: 

AREA1+X'2D' (EXIT-ENTRY) /8 29 

* + 32 =F'1234« L' FIELD 

N-25 L * BETA* 10 TEN/TWO 

FIELD B 1 101 1 LAMBDA+GAMMA 

FIELD+332 C'ABC 



Evalua tion of Expressions 



EXPRESSIONS 

The preceding subsection dealt with the 
various types of terms that can be used, 
either singly or in combination, to form 
operand entries. This subsection now deals 
with the more general category of 
expressions, where an expression is an 
operand entry consisting of either a single 
term or an arithmetic combination of terms. 

Up to three terms can be combined with 
the following arithmetic operators: 

+ addition, e.g., ALPHA+2 

subtraction, e. g. , ALPHA-BETA 
* multiplication, e.g., 5*L * DATA 
/ division, e.g., (ALPHA-BETA) /2 

Two of the terms within a three term 
expression can be grouped within 
parentheses to indicate to the Assembler 
the order in which they are to be 
evaluated. When the Assembler program 
encounters terms in parentheses in 



A single term expression, e.g., 29, BETA, 
*, L 1 SYMBOL, takes on the value of the term 
involved. 

A multiterm expression, e.g., 
BETA* 10, ENTRY-EXIT, 10+A/B, is reduced to a 
single value, as follows: 

1. Each term is given its value. 

2. Expressions within parentheses are 
evaluated first. 

3. Arithmetic operations are performed 
left to right. Multiplication and 
division are done before addition and 
subtraction, e.g., A+B*C is evaluated 
as A+ (B*C) , not (A+B)*C. The computed 
result is the value of the expression. 

4. Division yields an integer result; any 
fractional portion of the result will 
be dropped. For example, the 
expression 1/2*10 eguals zero, but the 
expression 10*1/2 equals five. 
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5. Division by zero is valid and yields a 
zero result. 

Final values of expressions representing 
storage addresses are never greater than 
2 24 -1, however intermediate results may 
have a maximum value of 2 31 -1. 

Absolut e and _ Rel ocatable E x pressions 

An expression is called absolute if its 
value is unaffected by program relocation 

An expression is called relocatable if 
its value changes upon program relocation 

The two types of expressions, absolute 
and relocatable, take on these 
characteristics from the term or terms 
composing them. The following material 
discusses this relationship. 

ABSOLUTE EXPRESSION; An absolute 
expression may be an absolute term or any 
arithmetic combination of absolute terms. 
An absolute term may be an absolute symbol, 
any of the self-defining terms, or the 
length attribute reference. As indicated 
in Figure 2, all arithmetic operations are 
permitted between absolute terms. 

An absolute expression may contain two 
relocatable terms (RT) — alone or in 
combination with an absolute term (AT) — 
under the following conditions: 

1 . The relocatable terms must be paired, 
that is, they must appear in the same 
control section in this assembly (see 
Program S ect ion ing a nd Linking ) and 
have opposite signs. The paired terms 
do not have to be contiguous, e.g., 
RT+AT-RT. 

2. No relocatable term may enter into a 
multiply or divide operation. Thus, 
RT-RT*10 is invalid However, 
(RT-RT)*10 is valid. 

The pairing of relocatable terms cancels 
the effect of relocation. Therefore the 
value represented by the paired terms 
remains constant, regardless of program 
relocation For example, in the absolute 
expression A-Y+X, A is an absolute term, 
and X and Y are . relocatable terms from the 
same control section. If A equals 50, Y 
eguals 25, and X equals 10, the value of 
the expression would be 35. If X and Y are 
relocated by a factor of 100 their values 
would then be 125 and 110. However, the 
expression would still evaluate as 35 
(50-125+110=35) . 

An absolute expression reduces to a 
single absolute value. 



The following examples illustrate 
absolute expressions. A is an absolute 
term; X and Y are relocatable terms from 
the same control section. 



A-Y+X 
A 

A*A 
X-Y+A 

*-Y (a reference to the Location Counter 
must be paired with another 
relocatable term from the same control 
section) . 



RELOCA TABLE EXPRESSIONS: A relocatable 
expression is one whose value would change 
by n if the program in which it appears is 
relocated n bytes away from its originally 
assigned area of storage. A relocatable 
expression must not have a value below the 
starting address of the control section, 
except in a USING, CCW, or A- and Y-type 
address constant. 

A relocatable expression may be a 
relocatable term. A relocatable expression 
may contain relocatable terms — alone or 
in combination with absolute terms — under 
the following conditions: 

1. There must be an odd number of 
relocatable terms. 

2. If a relocatable expression contains 
three relocatable terms, two of them 
must be paired. Pairing is described 
in Absolu te Expressio n. 

3. The unpaired term must not be directly 
preceded by a minus sign. 

4. No relocatable term may enter into a 
multiply or divide operation. 

A relocatable expression reduces to a 
single relocatable value. This value is 
the value of the odd relocatable term, 
adjusted by the values represented by the 
absolute terms and/or paired relocatable 
terms associated with it. 

For example, in the expression W-X+W, W 
and X are relocatable terms from the same 
control section. If initially W equals 10 
and X equals 5, the value of the expression 
is 15. However, upon relocation this value 
will chanqe. If a relocation factor of 100 
is applied, the value of the expression is 
115. Note that the value of the paired 
terms, H-X, remains constant at 5 
reqardless of relocation. Thus, the new 
value of the expression, 115, is the result 
of the value of the odd term (W) adjusted 
by the values of W-X. 
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The following examples illustrate Y-32*A W-X+* =F 1 1 234 ' (literal) 

relocatable expressions. A is an absolute W-X+Y A*A + W 

term, W and X are relocatable terms from * (reference to W-X+W 

the same control section. Y is a Location Counter) Y 

relocatable term from a different control 
section. 



General Information 



ADDRESSI NG — PRO GRAM SEC TIONING AND LINK ING 



ADDRESSING 

The System/360 addressing technique 
requires the use of a base register, which 
contains the base address, and a 
displacement, which is added to the 
contents of the base register. The 
programmer may specify a symbolic address 
and reguest the assembler to determine its 
storage address in terms of a base register 
and a displacement. The programmer may 
rely on the assembler to perform this 
service for him by indicating which general 
registers are available for assignment and 
what values the assembler may assume each 
contains. The : programmer may use as many 
or as few registers for this purpose as he 
desires.- The only requirement is that, at 
the point of reference, a register 
containing an address from the same control 
section is available, and that this address 
is less than or equal to the address of the 
item to which the reference is being made. 
The difference between the two addresses 
may not exceed 4095 bytes. 



ADDRESSES — EXPLICIT AND IMPLIED 

An address is composed of a displacement 
plus the contents of a base register. (In 
the case of RX instructions the contents 
of an index register are also used to 
derive the address.) 



The programmer writes an explicit 
address by specifying the displacement and 
the base register. If, in an RX 
instruction, an explicit address is used, 
it is assembled without being checked for 
proper boundary alignment. The assembler 
assumes that the programmer has either used 
an aligned explicit address or programmed 
with a register to align the address. 



The boundary alignment checked by the 
assembler is the alignment of the effective 
address, when an implied address is used. 
The programmer writes an implied address by 
specifying an absolute or relocatable 
address. The assembler can select a base 
register and compute a displacement, 
thereby generating an explicit address from 
an implied address, if the programmer has 
conveyed the availability and contents of 
the base registers. He can do this with 
the USING and DROP instructions. 



BASE REGISTER INSTRUCTIONS 

The USING and DROP assembler instructions 
enable programmers to use expressions 
representing implied addresses as operands 
of machine-instruction statements, leaving 
the assignment of base registers and the 
calculation of displacements to the 
assembler. 

In order to use symbols in the operand 
field of machine-instruction statements 
the programmer must (1) indicate to the 
assembler, by means of a USING statement, 
that one or more general registers are 
available for use as base registers, (2) 
specify by means of the USING statement, 
what value each base register contains, and 
(3) load each base register with the value 
he has specified for it. 

A program must have at least one USING 
statement for each control section to be 
addressed . 

Having the assembler determine base 
registers and displacements relieves the 
programmer of separating each address into 
a displacement value and a base address 
value. This feature of the assembler will 
eliminate a likely source of programming 
errors, thus reducing the time reguired to 
check out programs. To take advantage of 
this feature, the programmer uses the USING 
and DROP instructions described in this 
subsection. The principal discussion of 
this feature follows the description of 
both instructions. 



RE GISTER USAGE 

Certain general registers have special uses 
and are available to the programmer under 
certain restrictions. These registers and 
the restrictions follow. 

0-1 These registers are used by the 

routines generated from the 
IBM-supplied macros. Therefore, 
these registers may be used without 
restriction if no IBM macros appear 
in the program; otherwise they 
should be used only for immediate 
computations, where the content of 
the register is no longer needed 
after the computation. If the 
programmer uses them, he must 
either save their content himself 
(and reload them later) or be 
finished with them before IOCS uses 
them. 
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12-13 These registers are used by the 
Supervisor Interruption Routine. 
Since interruptions are 
unpredictable, these registers 
should not be used by the 
programmer, unless SUPVR 
SAVEREG=YES is specified" when 
assembling the supervisor. (See 
Macro Instru ct ions to Assemble a 
Supervisor. ) 

Note: Whenever Autotest is 
used, the programmer must not use 
registers 12 and 13 because these 
registers are used by the Autotest 
Master Control routine. 

14-15 Logical IOCS uses these two 

registers for linkage. Register 14 
contains the return address (to the 
problem program) from the DTF 
routine. Register 15 contains the 
entry point into the DTF routine. 
IOCS does not save the contents of 
these registers prior to using 
them; if the programmer uses them, 
he must either save their contents 
himself (and reload them later) or 
be finished with them- before IOCS 
uses them. It should be noted that 
IOCS uses these registers only when 
the user has called an IOCS routine 
such as GET, PUT, OPEN, or CLOSE. 

Registers 2-11 are available to the 
programmer. To avoid the possibility of 
errors, these registers should be the 
registers used by the programmer.' However, 
if for any reason there is a shortage of 
registers, 0-1 and 14-15 are available 
under the restrictions previously stated. 

Note ; Whenever the Translate and Test 
(TRT) instruction is used, the contents of 
register 2 must be saved before this 
instruction is executed. After the TRT 
instruction has been executed, the contents 
of register 2 may be restored. See the 
System /3 60 Principles of Operation manual 
listed on the front cover of this 
publication for further information on the 
TRT instruction. 



The format of the USING instruction 
statement is: 



| Name 


| Operation 
H 


i — — 1 

|Operand | 

— 1 1 


|Blank 


| USING 

I 

I 


|From 2-6 expressions | 
jof the form v,r1, | 
|r2,r3,r4,r5 | 
,t j 



Operand v must be an absolute or 
relocatable expression. No literals are 
permitted. Operand v specifies a value 
that the assembler can use as a base 
address. The other operands must be 
absolute expressions. The operand r1 
specifies the general register that can be 
assumed to contain the base address 
represented by operand v. Operands r2, r3, 
r4, and r5 specify registers that can be 
assumed to contain v*4096, v+8192, v+12288, 
and v+16384 respectively The values of the 
operands r1, r2, r3, r4, and r5 must be 
between 0 and 15. For example, the 
statement: 



j 1 ; 1 

Name | Operation [Operand | 
1 .j 1 

|USING |*,8,9 | 
i i i 



tells the assembler it may assume that the 
current value of the Location Counter will 
be in general register 8 at object time, 
and that the current value of the Location 
Counter, incremented by 4096, will be in 
general register 9 at object time. 



The operands r1, r2, r3, r4, and r5 can 
be a symbol or an expression provided that 
the value of the symbol or expression is 
between 0 and 15. 



USING — Use B a se Ad dr ess Registers 

The USING instruction indicates that one 
or more general registers are available for 
use as base registers. This instruction 
also states the base address values that 
the assembler may assume will be in the 
registers at object time. Note that a 
USING instruction does not load the 
registers specified. It is the 
programmer's responsibility to see that the 
specified base address values are placed 
into the registers. Suggested loading 
methods are described in the subsection 
Pro gramming with t he U SING Instruction . 



If the programmer changes the value in a 
base register currently being used and 
wishes the assembler to compute 
displacements from this value, the 
assembler must be told the new value by 
means of another USING statement. In the 
following seguence the assembler first 
assumes that the value of ALPHA is in 
register 9. The second statement then 
causes the assembler to assume that 
ALPHA+1000 is the value in register 9. 



Addressing — 
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1 — 

| Name 


| Operation 


T - - 1 

|Operand j 




1 USING 


-+ 1 

| ALPHA, 9 | 

1 1 




| USING 


1 1 

IALPHA+ 1000,9 | 

JL _ . . 1 



A USING statement m 
register 0 as a base r 
is a relocatable expre 
general register 0 is 
operand r1. In this c 
assumes that register 
zero. Subseguent regi 
the same statement are 
values 4096, 8192, etc 
therefore places all s 
addresses less than 40 
displacement field and 
base register field. 



ay specify general 
egister if operand v 
ssion or zero. If 
specified, it must be 
ase, the assembler 
0 contains the value 
sters specified in 

assumed to have the 
The assembler 
ubseguent effective 
96 in the 

uses zero for the 



Note: If register 0 is made available by a 
USING instruction, the program is not 
relocatable, despite the fact that the 
value specified by operand v must be 
relocatable. However, the programmer is 
able to make the program relocatable at 
some future time by: 

1. Replacing register 0 in the USING 
statement. 

2. Loading the register with a relocatable 
value. 

3. Reassembling the program. 



DRO P — Drop Base Re gister 

The DROP instruction specifies a previously 
available register that may no longer be 
used as a base register. The format of the 
DROP instruction statement is as follows: 



T 1 

IName JOperation |Operand 




DROP 



H 

| Up to 5 absolute 
jexpressions of the 
jform r1,r2, 
|r3,r4,r5 



The expressions indicate general 
registers previously named in a USING 
statement that are now unavailable for base 
addressing. The following statement for 
example, prevents the assembler from using 
registers 7 and 1 1 : 



1 1 1 

| Name 


i 

| Operation 


T 

| Operand 


— i 
1 


J 

1 
t 


— 1 

| DROP 


H ~ 

17,11 
• 


1 

1 

j 



It is not necessary to use a DROP 
statement when the base address in a 
register is changed by a USING statement; 
nor are DROP statements needed at the end 
of the source program. 

A register made unavailable by a DROP 
instruction can be made available again by 
a subseguent USING instruction. 



PROGRAMMING WITH THE USING INSTRUCTION 



The USING (and 
used anywhere 
needed, to ind 
that are avail 
registers and 
assembler may 
execution time 
specified in a 
statement, the 
there is an av 
suitable base 
considered ava 
address if it 
value that is 
as the address 
absolute value 
absolute addre 
base address i 
it is less tha 
the item to wh 
The difference 
may not exceed 



DROP) instructions may be 
in a program, as often as 
icate the general registers 
able for use as base 
the base address values the 
assume each contains at 
Whenever an address is 

machine-instruction 

assembler determines whether 
ailable register containing a 
address. A register is 
liable for a relocatable 
was loaded with a relocatable 
in the same control section 
A register with an 

is available only for 
sses. In either case, the 
s considered suitable only if 
n or egual to the address of 
ich the reference is made. 

between the two addresses 

4095 bytes. 



In the follow 
instruction load 
address of the f 
immediately foil 
the instruction 
instruction indi 
register 2 conta 
employing this m 
instruction must 
BALR instruction 
instructions are 
named LAST is wi 



ing seguence, the BALR 
s register 2 with the 
irst storage location 
owing. In this case, it is 
named FIRST. The USING 
cates to the assembler that 
ins this location. When 
ethod, the USING 

immediately follow the 
No other USING or load 

reguired if the location 
thin 4095 bytes of FIRST. 



I ~ 

| Name 

I- 



| BEGIN | BALR 

| JUSING 

IFIRST | . 

I I • 



T 1 — 

|Operation |Operand 
+ 



| LAST | 



END 



12,0 
l*,2 



I 

| BEGIN 



In the following example, the BALR and 
LM instructions load registers 2-5. The 
USING instruction indicates to the 
assembler that these registers are 
available as base registers for addressing 
a maximum of 16,384 consecutive bytes of 
storage, beginning with the location named 
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HERE. The number of addressable bytes may 
be increased or decreased by altering the 
number of registers designated by the USING 
and LM instructions and the number of 
address constants specified in the DC 
instructions. 



i 1 

jName | Operation 



| BEGIN 
I 

I HERE 
I 

IBASEADDR 



FIRST 



I 
I 

| LAST 
I 



| Operand 



BALR 
USING 
LM 
B 

DC 
DC 
DC 



END 



12,0 

|HERE,2,3,4,5 
| 3 , 5 , B ASEADDR 
| FIRST 

| A (HERE+4096) 
|A (HERE+8192) 
I A (HERE+12288) 



BEGIN 



RELATIVE ADDRESSING 

Relative addressing is the technigue of 
addressing instructions and data areas by 
designating their location in relation to 
the Location Counter or to some symbolic 
location. This type of addressing is 
always in bytes, never in bits, words, or 
instructions. Thus, the expression *+4 
specifies an address that is four bytes 
greater than the current value of the 
Location Counter. In the seguence of 
instructions shown in the following 
example, the location of the CR machine 
instruction can be expressed in two ways, 
ALPHA+2 or BETA-4, because all of the 
mnemonics in the example are for 2-byte 
instructions in the RR format. 



1 

I Name 
J 


T 

|Operation 


i - — i 

|Operand | 


| ALPHA 

1 

1 

IBETA 

L 


~f 

| LR 
|CR 
|BCR 
| AR 

.L , - 


— 1 1 

13,4 | 
14,6 | 

11,14 I 
|2,3 | 
-j. ._ j 


PROGRAM 


SECTIONING 


AND LINKING 



It is often convenient, or necessary, to 
write a large program in sections. The 
sections may be assembled separately, then 
combined subseguently into cne object 
program. The assembler provides facilities 
for creating multisectioned programs and 
symbolically linking separately assembled 
programs or program sections. The combined 
number of control sections and dummy 
sections may not exceed 32. The combined 
number of control sections and dummy 
sections plus the number of unigue symbols 



in EXTRN statements and V-type address 
constants may not exceed 255. (EXTRN 
statements are discussed in this section; 
V-type constants under DC — Define 
Con stant assembler instruction.) If the 
same symbol appears in a V-type address 
constant and in the name field of any other 
statement, it is counted as two symbols. 



Sectioning a progra 
many programs can best 
sectioning them. The 
unsectioned program ne 
himself with the subse 
program sections, whic 
sections. He need not 
instruction, which is 
control sections of a 
Similarly, he need not 
the discussion of symb 
program neither reguir 
receives a linkage fro 
He may, however, wish 
program and/or specify 
location for it, both 
by using the START ins 
also want to employ th 
feature obtained by us 
instruction . 



m is optional, and 

be written without 
programmer writing an 
ed not concern 
guent discussion of 
h are called control 

employ the CSECT 
used to identify the 
multisection program. 

concern himself with 
olic linkages if his 
es a linkage to nor 
m another program, 
to identify the 

a tentative starting 
of which may be done 
truction. He may 
e dummy section 
ing the DSECT 



Note: Program sectioning and linking is 
closely related to the specification of 
base registers for each control section. 
Sectioning and linking examples are 
provided under the heading A ddressing 
External Control Sections. 



CONTROL SECTIONS 

The concept of program sectioning is a 
consideration at coding time, assembly 
time, and load time. To the programmer, a 
program is a logical unit. He may want to 
divide it into sections called control 
sections; if so, he writes it in such a way 
that control passes properly from one 
section to another regardless of the 
relative physical position of the sections 
in storage. A control section is a block 
of coding that can be relocated, 
independently of other coding, at load time 
without altering or impairing the operating 
logic of the program. It is normally 
identified by the CSECT instruction. 
However, if it is desired to specify a 
tentative starting location, the START 
instruction may be used to identify the 
first control section 

To the assembler, there is no such thing 
as a program; instead, there is an 
assembly, which consists of one or more 
control sections. (However, the terms 
assembly and program are often used 
interchangeably An unsectioned program is 
treated as a single control section. To 
the linkage editor, there are no programs. 
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only control sections that must be 
fashioned into an object program. 

The output of the assembler consists of 
the assembled control sections and a 
control dictionary. The control dictionary 
contains information the linkage editor 
needs in order to complete 

cross-referencing between control sections, 
as' it combines them into an object program. 
The linkage editor can take control 
sections from various assemblies and 
combine them properly with the help of the 
corresponding control dictionaries. 
Successful combination of separately 
assembled control sections depends on the 
techniques used to provide symbolic 
linkages between the control sections. 

Whether the programmer writes an 
unsectioned program, a multisection 
program or part of a multisection program, 
he still knows what eventually will be 
entered into storage, because he has 
described storage symbolically. He may not 
know where each section appears in storage, 
but he does know what storage contains. 
There is no constant relationship between 
control sections. Thus, knowing the 
location of one control section does not 
make another control section addressable by 
relative addressing techniques. 

Control Section Location Assignment 

Control section contents can be intermixed 
because the assembler provides a Location 
Counter for each control section. 
Locations are assigned to control sections 
in such a way that the sections are placed 
in storage consecutively, in the same order 
as they first occur in the program. Each 
control section subsequent to the first 
begins at the next available double-word 
boundary . 



FIRST CONTROL SECTION 

The first control section of a program has 
the following special properties 

1. Its tentative loading location may be 
specified as an absolute value. 

2. It normally contains the literals 
requested in the program, although 
their positioning can be altered. 
This is further explained under the 
discussion of the LTORG assembler 
instruction . 

START — Start, A ssembl y 

The START instruction may be used to give a 
name to the first (or only) control section 
of a program. There may be only one START 



instruction in an assembly. It may also be 
used to specify a tentative starting 
location for the program. The format of 
the START instruction statement is as 
follows: 



i 1 ■ % 1 

| Name | Operation | Operand | 
I , __ , , 

| A symbol | START |A self-defining | 
I or blank | |term or blank | 
i 1 i ', i 



If a symbol names the START instruction 
the symbol is established as the name of 
the control section. If not, the control 
section is considered to be unnamed. All 
subsequent statements are assembled as part 
of that control section This continues 
until a CSECT instruction identifying a 
different control section or a DSECT 
instruction is encountered. A CSECT 
instruction named by the same symbol that 
names a START instruction is considered to 
identify the continuation of the control 
section first identified by the START. 
Similarly an unnamed CSECT that occurs in 
a program initiated by an unnamed START is 
considered to identify the continuation of 
the unnamed control section 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the 
control section. It has a length attribute 
of one. 

The assembler uses the self-defining 
value specified by the operand as the 
tentative starting location of the program. 
This value must be divisible by eight. For 
example, either of the following statements 
could be used to assign the name PR0G2 to 
the first control section and to indicate 
an initial assembly location of 2040: 



1 — — 

| Name 
J 


T 

| Operation 


■ M i 

| Operand 

— 1 


. .. ., _. , 
1 

H 


| PR0G2 
|PROG2 
i 


-+ 

| START 
| START 
j. . 


12040 
|X '7F8 « 


1 
1 

,i 



If the operand is omitted, the assembler 
sets the tentative starting location of the 
program at zero. 

Not e ; The START instruction may be 
preceded only by ICTL, ISEQ, REPRO, PUNCH, 
EJECT, SPACE, TITLE, PRINT, and comments 
statements, and by macro instructions that 
generate only these statements. 

If the user plans to write his own 
macro-instruction routines, the START 
instruction may not be used as an 
instruction within his macro routine. 
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CSECT — Identify Control Sectio n 

The CSECT instruction identifies the 
beginning or the continuation of a control 
section. The format of the CSECT 



instruction 


statement 


is as follows: 


r i 

|Name 


Operation 


■ i i 

| Operand | 


| 

|A symbol 


CSECT 


— 1 1 

| Not used ; any | 


|or blank 




| operand is treated! 


1 

i 




| as a comment j 
i . i 



If a symbol names the CSECT instruction 
the symbol is established as the name of 
the control section; otherwise the section 
is considered to be unnamed. All 
statements following the CSECT are 
assembled as part of that control section 
until a statement identifying a different 
control section is encountered (i.e., 
another CSECT or a DSECT instruction) . 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the 
control section. It has a length attribute 
of one. 

Several CSECT statements with the same 
name may appear within a program. The 
first is considered to identify the 
beginning of the control section; the rest 
identify the resumption of the section. 
Thus, statements from different control 
sections may be interspersed. They are 
properly assembled (assigned contiguous 
storage locations) as long as the 
statements from the various control 
sections are identified by the appropriate 
CSECT instructions 

Unna m ed Control Sectio n 

If neither a named CSECT instruction nor 
START instruction appears at "the beginning 
of the program, the assembler determines 
that it is to assemble an unnamed control 
section as the first (or only) control 
section. There may be only one unnamed 
control section in a program. If one is 
initiated and is then followed by a named 
control section, any subseguent unnamed 
CSECT statements are considered to resume 
the unnamed control section. If it is 
desired to write a small program that is 
unsectioned, the program does not need to 
contain a CSECT instruction. 

DSECT — Identify Dummy Section 

A dummy section represents a control 
section that is assembled but is not part 
of the object program. A dummy section is 
a convenient means of describing the layout 
of an area of storage without actually 



reserving the storage. (It is assumed that 
the storage is reserved either by some 
other part of this assembly or else by 
another assembly The DSECT instruction 
identifies the beginning or resumption of a 
dummy section. More than one dummy section 
may be defined per assembly, but each must 
be named. The format of the DSECT 
instruction statement is as follows: 



i 1 ] 1 

| Name |Operation | Operand | 

I 1 1 1 

| A symbol | DSECT \ Not used; any | 
j I joperand is treated! 
I j (as a comment | 
i , i i i 



The symbol in the name field is a valid 
relocatable symbol whose value represents 
the first byte of the dummy section. It 
has a length attribute of one. 

Program statements belonging to dummy 
sections may be interspersed throughout the 
program or may be written as a unit. In 
either case, the appropriate DSECT 
instruction should precede each set of 
statements. Whenever the assembler 
instructions EJECT, SPACE, PRINT, PUNCH, 
REPRO, XFR, or TITLE are used within a 
DSECT, they are treated as comments and not 
executed. When multiple DSECT instructions 
with the same name are encountered the 
first is considered to initiate the dummy 
section and the rest to continue it. 

Symbols that appear in the name field of 
a DSECT statement or in the name field of 
statements in a dummy section may be used 
in USING instructions. Therefore, they may 
be used in program elements (e.g., 
machine-instructions and data definitions) 
that specify storage addresses. An example 
illustrating the use of a dummy section 
appears subseguently under Addressing - Dummy 
Sections . 

A symbol that names a statement in a 
dummy section may be used in an A-type 
address constant only if it is paired with 
another symbol (with the opposite sign) 
from the same dummy section. 

DUMMY SEC TION - LOCA T ION A SSIGNMENT: A 
Location Counter is used to determine the 
relative locations of named program 
elements in a dummy section. The Location 
Counter is always set to zero at the 
beginning of the dummy section, and the 
location values assigned to symbols that 
name statements in the dummy section are 
relative to the initial statement in the 
section. 

ADDRESSING DU MMY SECTION S: The programmer 
may wish to describe the format of an area 
whose storage location will not be 
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determined until the program is executed. 
He can describe the format of the area in a 
dummy section, and he can use symbols 
defined in the dummy section as the 
operands of machine instructions. To 
effect references to the storage area, he 
does the following: 



1. Provides a USING statement specifying 
both a general register that the 
assembler can assign to the machine- 
instructions as a base register and a 
value from the dummy section that the 
assembler may assume the register 
contains 



2. Ensures that the same register is 

loaded with the actual address of the 
storage area. 



The values assigned to symbols defined 
in a dummy section are relative to the 
initial statement of the section. Thus, 
all machine-instructions which refer to 
names defined in the dummy section will, at 
execution time, refer to storage locations 
relative to the address loaded into the 
register. 



An example is shown in the following 
coding. Assume that two independent 
assemblies (assembly 1 and assembly 2) have 
been loaded and are to be executed as a 
single overall program. Assembly 1 is an 
input routine that places a record in a 
specified area of storage, places the 
address of the input area containing the 
record in general register 3, and branches 
to assembly 2. Assembly 2 processes the 
record. Coding shown in the example is 
from assembly 2. 



The input area is described in assembly 
2 by the DSECT control section named 
INAREA. Portions of the input area (i.e., 
record) that the programmer wishes to work 
with are named in the DSECT control section 
as shown. The assembler instruction USING 
INAREA, 3 designates general register 3 as 
the base register to be used in addressing 
the DSECT control section, and that general 
register 3 is assumed to contain the 
address of INAREA. 

Assembly 1, during execution, loads the 
actual beginning address of the input area 
in general register 3. Because the symbols 
used in the DSECT section are defined 
relative to the initial statement in the 
section, the address values they represent, 
will, at the time of program execution, be 
the actual storage locations of the input 
area. 



r 

| Name 


T — 

| Operation 
— 1 


1 

|Operand | 








| ASMBLY2 


ICSECT 


| | 


IBEGIN 


| BALR 


12,0 | 




| USING 


l*/2 | 




j ; 

|USING 


j J 

J INAREA, 3 | 




|CLI 


|INCODE,C'A' | 




| BE 


| ATYPE | 


| ATYPE 


|MVC 


| WORKA, INPUTA | 




| M.VC 


IWORKB, INPUTB | 


| WORKA 


| 

IDS 


| | 

ICL20 | 


| WORKB 


| DS 


|CL18 | 






! | 


| INCODE 


IDS 


|CL1 | 


| INPUTA 


IDS 


|CL20 | 


| INPUTB 


| DS 


|CL18 | 


i... , ... 


| END 
i 





SYMBOLIC LINKAGES 

Symbols may be defined in one program and 
referred to in another, thus effecting 
symbolic linkages between independently 
assembled programs. The linkages can be 
effected only if the assembler is able to 
provide information about the linkage 
symbols to the linkage editor, which 
resolves these linkage references at load 
time. The assembler places the necessary 
information in the control dictionary on 
the basis of the linkage symbols identified 
by the ENTRY and EXTRN instructions. Note 
that these symbolic linkages are described 
as linkages between independent assemblies; 
more specifically, they are linkages 
between independently assembled control 
sections. 

In the program where the linkage symbol 
is defined (i.e., used as a name), it must 
also be identified to the assembler by 
means of the ENTRY assembler instruction. 
It is identified as a symbol that names an 
entry point, which means that another 
program will use that symbol in order to 
effect a branch operation or a data 
reference. The assembler places this 
information in the control dictionary. 

Similarly, the program that uses a 
symbol defined in some other program must 
identify it by the EXTRN assembler 
instruction. It is identified as an 
externally defined symbol (i.e., defined in 
another program) that is used to effect 
linkage to the point of definition The 
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assembler places this information in the 
control dictionary. 

There is another way to obtain symbolic 
linkage, namely by using the V-type address 
constant. The subsection Data Definition 
In s tructions contains the details pertinent 
to writing a V-type address constant. It 
is sufficient here to note that this 
constant may be considered an indirect 
linkage point. It is created from an 
externally defined symbol, but that symbol 
does not have to be identified by an EXTRN 
statement The V-type address constant may 
be used for external branch references 
(i.e., for effecting branches to other 
programs) . It should not be used for 
external data references (i.e., for 
referring to data in other programs) . 



defined in some other program Each 
external symbol must be identified; this 
includes symbols that name control 
sections. The format of the EXTRN 
instruction statement is as follows: 



1 T 

|Name J 
1 h 


Operation 


T 

| Operand 

H 


1 

1 

1 


IBlank J 
1 1 

1 — JL. 


EXTRN 


| A relocatable 

| symbol 
j. . 


1 
1 



The symbol in the operand field may not 
appear as the name of a statement in this 
program. The following example identifies 
three external symbols that have been used 
as operands in this program but are defined 
in some other program. 



ENTRY — IDENTIFY ENTRY-POINT SYMBOL 

The ENTRY instruction identifies a linkage 
symbol that is defined in this program but 
may be used by some other program. The 
format of the ENTRY instruction statement 
is as follows: 



1 — \ 

| Name 


■ " '■ 
Operation 


T 1 

| Operand | 


|Blank 
• 


ENTRY 


H \ 

| A relocatable | 
| symbol that also | 
j appears as a state- j 
j ment name | 



The symbol in the ENTRY operand field 
may be used as an operand by other 
programs. An ENTRY statement operand may 
not contain a symbol defined in an unnamed 
control section or a dummy section. The 
following example identifies the statements 
named SINE and COSINE as entry points to 
the program. 



i r 

|Name | Operation 



Operand 



ENTRY 
ENTRY 



SINE 
COSINE 



The name of a control section does not 
have to be identified by an ENTRY 
instruction when another program uses it as 
an entry point. The assembler 
automatically places information on control 
section names in the control dictionary. A 
maximum of 100 ENTRY statements will be 
processed in a single assembly. 



EXTRN — IDENTIFY EXTERNAL SYMBOL 

The EXTRN instruction identifies a linkage 
symbol that is used by this program but 



1 1 

Name | Operation | Operand 
1 +- 



| EXTRN 
| EXTRN 
| EXTRN 
j 



RATEBI 
| PAYCALC 
I WITHCALC 



An example that employs the EXTRN 
instruction appears subseguently under 
Ad d ressing Exter n al Co n tro l Sections . 

Note : A V-type address constant does not 
have to be defined by an EXTRN statement. 

Note: When external symbols are used in an 
expression they may not be paired. The 
assembler processes them as though they 
originated from different control sections. 



Addressing External Control Sections 

A common way for a program to link to an 
external control section is to: 

1. Create a V-type address constant with 
the name of the external symbol. 

2. Load the constant into a general 
register and branch to the control 
section via the register. 



r 



Name 



"1 1 : 

| Operation |Operand 



MAINPROG |CSECT 
BEGIN | BALR 

IUSING 



I 



VCON 



| BALR 



| DC 
| END 



12,0 
I*, 2 



| 3, VCON 
11,3 



| V (SINE) 
| BEGIN 



Addressing — 
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For example, to link to the control 
section named SINE, the preceding coding 
might be used. 



An external symbol naming data may be 
referred to as follows: 

1. Identify the external symbol with the 
EXTRN instruction, and create an 
address constant from the symbol. 

2. Load the constant into a general 
register, and use the register for base 
addressing. 

For example, to use an area named 
RATETBL, which is in another control 
section, the following coding might be 
used : 



| Name 


i 

| Operation 
H 


| Operand | 


| MAINPROG 
| BEGIN 


| CSECT 
| BALR 
| USING 
1 - 


12,0 | 
|*,2 | 




1 • 

| EXTRN 

1 • 


| RATETBL | 




1 - 

It 

| USING 
|A 

1 • 


| 4, RATEADDR | 
| RATETBL, 4 | 
| 3, RATETBL | 


| R ATEADDR 


1 • 

|DC 
| END 

.L._ _, . . 


| A (RATETBL) | 
| BEGIN | 

,,_ . . . J 
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MACHINE- INSTRUCTIO NS 



This section discusses the coding of the 
machine- instructions represented in the 
assembler language. The reader is reminded 
that the functions of each 
machine- instruction are discussed in the 
Principles o f O perat ion manual (see 
Preface) . 



Floating-point instructions must 
specify floating-point registers 0, 2, 
4, or 6. 

Double-shift, full-word multiply, and 
full-word divide instructions must 
specify an even-numbered general 
register in the first operand. 



MACHINE- INSTRUCT ION ST ATEMENTS 

Machine- instructions may be represented 
symbolically as assembler language 
statements. The symbolic format of each 
varies according to the actual 
machine- instruction format, of which there 
are five: RR, RX, RS, SI, and SS. Within 
each basic format, further variations are 
possible . 

The symbolic format of a machine- 
instruction is similar to, but does not 
duplicate, its actual format. Appendix D 
illustrates machine format for the five 
classes of instructions. A mnemonic 
operation code is written in the operation- 
field, and one or more operands are written 
in the operand field. Comments may be 
appended to a machine-instruction statement 
as previously explained in the 
Introduction . 

Any . machine-instruction statement may be 
named by a symbol, which other assembler 
statements can use as^an operand. The 
value attribute of the symbol is the 
address of the leftmost byte assigned to 
the assembled instruction. The length 
attribute of the symbol depends on the 
basic instruction format, as follows: 



Bas ic Format 

ER 

RX 

RS 

SI 

SS 



Instruction Ali gnment and Checking 




All machine- instructions are a 
automatically by the assembler 
boundaries. If any statement 
information to be assembled re 
alignment, the bytes skipped a 
with hexadecimal zeros. All e 
that specify storage addresses 
to insure that they refer to a 
boundaries for the instruction 
they are used. Register numbe 
checked to make sure that they 
proper registers as follows: 



ligned 

on half-word 
that causes 
quires 
re filled 
xpressions 

are checked 
ppropriate 
s in which 
rs are also 

specify the 



OPERAND FIELDS AND SUBFIELDS 

Some symbolic operands are written as a 
single field and other operands are written 
as a field followed by one or two 
subfields. For example, addresses, consist 
of the contents of a base register and a 
displacement. An operand that specifies a 
base and displacement is written as a 
displacement field followed by a base 
register subfield, as follows: 40(5). In 
the RX format, both an index register 
subfield and a base register subfield are 
written as follows: 40(3,5). In the SS 
format, both a length subfield and a base 
register subfield are written as follows: 
40 (21,5) . 

Appendix p shows two types of addressing 
formats for RX, RS, SI, and SS 
instructions In each case, the first type 
shows the method of specifying an address 
explicitly, as a base register and 
displacement. The second type indicates 
how to specify an implied address as an 
expression. 

For example, a load multiple instruction 
(RS format) may have either of the 
following symbolic operands: 



R1,R3,D2 (B2) 
R1,R3,S2 



- explicit address 
implied address 



Whereas D2 and B2 must be represented by 
absolute expressions, S2 may be represented 
either by a relocatable or an absolute 
expression . 

In order to use implied addresses, the 
following rules must be observed: 

1. The base register assembler 
instructions (USING and DROP) must be 
used . 

2. An explicit base register designation 
must not accompany the implied address. 

For example, assume that FIELD is a 
relocatable symbol, which has been assigned 
a value of 7400. Assume also that the 
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assembler has been notified (by a USING 
instruction) that general register 8 
currently contains a relocatable value of 
4096 and is available as a base register. 
The following example shows a 
mach in e- instruction statement as it would 
be written in assembler language and as it 
would be assembled. Note that the value of 
D2 is the difference between 7400 and 4096 
and that X2 is assembled as zero, since it 
was omitted. The assembled instruction is 
presented in decimal: 



Assembler statement: 

ST 4 /FIELD 

Assembled instruction: 

Op. Code R1 X2 B2 D2 
50 4 0 8 3304 

An address may be specified explicitly 
as a base register and displacement (and 
index register for RX instructions) by the 
formats shown in the first column of the 
following table. The address may be 
specified as an implied address by the 
formats shown in the second column. 
Observe that the two storage addresses 
reguired by the SS instructions are 
presented separately; an implied address 
may be used for one while an explicit 
address is used for the other. 



1 

| Type 


Y ■■ TT 

| Explicit Address | 
-+ h 


— _. 

Implied Address | 


| EX 


|D2(X2,B2) | 


S2 (X2) | 




|D2(0,B2)* | 


S2 | 


| RS 


|D2(B2) j 


S2 | 


1 si 


I D1 (B 1) ,| 


S1 | 


| SS 


|D1(L1,B1) | 


S1(L1) | 




| D1 (L/B1) | 


S1(L) | 


■ 


|D2(L2,B2) | 

— L- .L. 


S2(L2) | 
i 



*A zero must be supplied in an RX 
explicit address when it is desired to 
omit an index register specification 
but include a base register 
specification. 

A comma must be written to separate 
operands. Parentheses must be written to 
enclose either one or two subfields of an 
operand, and two subfields must be 
separated by a comma. If the format of an 
operand includes one subfield and if the 
subfield is omitted, the parentheses must 
also be omitted. If the format includes 
two subfields, the following rules apply: 

1. If both subfields are omitted, the 
separating comma and the parentheses 
must also be omitted. 



L 2,48(4,5) 

L 2, FIELD (implied address) 

2. If the first subfield in the seguence 
is omitted, the comma that separates it 
from the second subfield is written. 
The parentheses must also be written. 

MVC 32 (16, 5) , FIELD 2 

MVC BETA (, 5) ,FIELD2 (implied length) 
(Beta must be an absolute expression) 

3. In the RX class of instructions if the 
index register subfield is not used, 
but the base register is specified, the 
first subfield (index register) must be 
specified as zero. It may not be 
omitted . 

L 2,48(4,5) 
L 2,48(0,5) 

4. If the second subfield in the seguence 
is omitted, the comma that separates it 
from the first subfield must be 
omitted. The parentheses must be 
written 

MVC 32 (16,5) , FIELD 2 

MVC FIELD1 (16) ,FIELD2 (implied 

address) 

Fields and subfields in a symbolic 
operand may be represented either by 
absolute or by relocatable expressions, 
depending on what the field reguires. (An 
expression has been defined as consisting 
of one term or a series of arithmetically 
combined terms.) Refer to Appendix D for a 
detailed description of field reguirements. 

Note : Blanks may not appear in an operand 
unless provided by a character 
self -defining term or a character literal 
Thus, blanks may not intervene between 
fields and the comma separators, between 
parentheses and fields, etc. 



LENGTHS — EXPLICIT AND IMPLIED 

The length field in SS instructions can be 
explicit or implied. To imply a length, 
the programmer omits a length field from 
the operand. The omission indicates that 
the length field is either of the 
following: 

1. The length attribute of the expression 
specifying the displacement, if an 
explicit base and displacement have 
been written. 

2. The length attribute of the expression 
specifying the effective address, if 
the base and displacement have been 
implied. 
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In either case, the lenqth attribute for 
an expression is the length of the leftmost 
term in the expression. 

By contrast, an explicit length is 
written by the programmer in the operand as 
an absolute expression. The explicit 
length overrides any implied length. 

Whether the length is explicit or 
implied, it is always an effective length. 
The value inserted into the length field of 
the assembled instruction is one less than 
the effective length in the 
machine- instruction statement 

Note: If a length field of zero is 
desired, the length may be stated either as 
a one or as a zero. (This is useful when 
the subject instruction is to be executed 
by the Execute (EX) machine instruction.) 

To summarize, the length reguired in an 
SS instruction may be specified explicitly 
by the formats shown in the first column of 
the following table or may be implied by 
the formats shown in the second column. 
Observe that the two lengths required in 
one of the SS instruction formats are 
presented separately. An implied length 
may be used for one while an explicit 
length is used for the other. 



| Explicit Length | Implied Length 



I 

| D1 (L1,B1) 

I S1 (L1) 

I D1 (L,B1) 

I SI (L) 

| D2(L2, B2) 

| S2(L2) 



D1 (,B1) 
S1 

D1 (,B1) 
S1 

D2 (,B2) 

S2 



example, the modifier L indicates a logical 
function, as in AL for Add Logical. 

Mnemonic codes for functions involving 
data usually indicate the data types, by 
letters that correspond to those for the 
data types in the DC assembler instruction 
(see Assembler Instruction Statements ) . 
Furthermore, letters U and W have been 
added to indicate short and long, 
unnormalized floating-point operations, 
respectively For example, AE indicates Add 
Normalized Short, whereas AU indicates Add 
Unnormalized Short. Where applicable, 
full-word fixed-point data is implied if 
the data type is omitted. 

The letters R and I are added to the 
codes to indicate, respectively,. RR and SI 
machine instruction formats. Thus, AER 
indicates Add Normalized Short in the RR 
format. Functions involving character and 
decimal data types imply the SS format. 



MACHINE-INSTRUCTION EXAMPLES 



The examples 
according to 
They illustra 
operand forma 
the examples 
elsewhere in 
symbols that 
lengths must 
elsewhere to 



that follow are grouped 
machine-instruction format, 
te the various symbolic 
ts. All symbols employed in 
must be assumed to be defined 
the same assembly. All 
specify register numbers and 
be assumed to be eguated 
absolute values. 



Implied addressing, control section 
addressing, and the function of the USING 
assembler instruction are not considered 
here. For discussion of these 
considerations and for examples of coding 
sequences that illustrate them, the reader 
is referred to Program Sectioning and 
Linking and Base Register In structions . 



MACHINE- INSTRUC TION MN EMONIC COD ES 

The mnemonic operation codes (shown in 
Append j .x B) are designed to be easily 
remembered codes that indicate the 
functions of the instructions The normal 
format of the code is shown below; the 
items in brackets are not necessarily 
present in all codes: 

Verb [Modifier] [Data Type] [Machine 
Format ] 

The verb, which is usually one or two 
characters, specifies the function. For 
example, A- represents Add , and MV 
represents Move. The function may be 
further defined by a modifier. For 



r 

| Name 


T - 

I Operation 


| Operand | 


1 

| ALPHA1 
| ALPHA2 
| BETA 
IGAMMA1 
| GAMMA2 
i 


H 

| LR 
| LR 
| SPM 
|SVC 
|SVC 

1 


— 1 ■ 1 

1 1,2 | 
| REG1 , REG2 | 
|6 | 
1 250 | 
| TEN | 
i — J 



The operands of ALPHA1, BETA, ana GAMMA 1 
are decimal self-defining values, which are 
categorized as absolute expressions. The 
operands of ALPHA2 and GAMMA2 are symbols 
that are equated elsewhere to absolute 
values. 
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RX Format 



1 

| Name 
I 


| D per ati cn 
— | 


i 

|Operand 


1 


| ALPHA 1 




—| 

11,39(4,10) 




| ALPHA2 


|L 


| REG 1 , 39 (4 ,TEN) 




| BETA 1 


IL 


| 2, ZETA (4) 




| BETA2 


|L 


| REG2/ ZETA (REG 4) 




I GAMMA 1 


IL 


| 2, ZETA 




IGAMMA2 


|L 


| REG2 , ZETA 




| GAMMA3 


|L 


|2,=F« 10 00' 




| LAMBDA 1 
i 


IL 
i 


13,20(0,5) 


j 



Both ALPHA instructions specify explicit 
addresses; REG 1 and TEN are absolute 
symbols. Both BETA instructions specify 
implied addresses, and both use index 
registers. Indexing is omitted from the 
GAMMA instructions. GAMMA 1 and GAMMA2 
specify implied addresses. The second 
operand of GAMMA3 is a literal. LAMBDA1 
specifies no indexing. 



RS Format 



r 

| Name 


— r — 

| Operation 


| Operand 


i 


| 

| ALPHA1 
| ALPHA2 
| ALPHA3 
| ALPHA4 
| ALPHA5 

L 


-4 

j BXH 
| BXH 
|BXH 
| SLL 
| SLL 
• 


_| 

I 1,2,20(4) 
| REG1 , REG2, 
| REG 1 ,REG2, 
| REG2,5 
j REG2,0 (5) 
i . .. 


20 (REGD) | 
ZETA | 

i 



Whereas ALPHA 1 and ALPHA2 specify 
explicit addresses, ALPHA3 specifies an 
implied address. ALPHA4 is a shift 
instruction shifting the contents of REG 2 
left 5 bit positions. ALPHA5 is a shift 
instruction shifting the contents of REG2 
left by the value contained in general 
register 5. 



SI Format 



Name 



T 1 — 

|Operation |Operand 



ALPHA1 
ALPHA2 
! BETA 1 
BETA2 
I GAMMA 1 
| GAMMA2 
! GAMMA3 
IGAMMA4 



| CLI 
|CLI 
| CLI 
| CLI 
| SIO 
|SIO 
| SIO 
|SIO 



| 40 (9) ,X'40 • 
| 40 (REG9) ,TEN 
| ZETA, TEN 
| ZETA,C«A ' 
|40 (9) 
I 0 (9) 
|40(0) 
I ZETA 



The ALPHA instructions and GAMMA1-GAMMA3 
specify explicit addresses, whereas the 



BETA instructions and GAMMA4 specify 
implied addresses. GAMMA2 specifies a 
displacement of zero. GAMMA3 does not 
specify a base register. 

SS-Format 



,. ... _. 

| Name 
j_ 


T ■-- T" - ... .. 

| Operation| Operand | 
■ i i 


| ALPHAI 


| AP 


140 (9,8) ,30 (6,7) | 


| ALPHA2 


| AP 


| 40 (NINE , REG8) ,30 (L6, 7) | 


| ALPHA3 


| AP 


| FIELD2,FIELD1 | 


| ALPHA4 


| AP 


| FIELD2 (9) , FIELD1 (6) | 


|BETA 


| AP 


| FIELD 2 (9) , FIELD 1 | 


| GAMMA 1 


|MVC 


|40 (9,8) ,30(7) | 


| GAMMA2 


| MVC 


| 40 (NINE, REG8) , DEC (7) | 


JGAMMA3 


|MVC 


| FIELD 2, FIELD 1 | 


| GAMMA4 
i 


|MVC 
■ 


| FIELD 2 (9) , FIELD 1 | 
i i 



ALPHA i t ALPHA2, GAMMA 1 , and GAMMA2 
specify explicit lengths and addresses. 
ALPHA3 and GAMMA3 specify both implied 
length and implied addresses. ALPHA4 and 
GAMMA4 specify explicit length and implied 
addresses.. BETA specifies an explicit 
length for FIELD2 and an implied length for 
FIELD 1 ; both addresses are implied. 



EX TENDED MNEMONI C CODES 

For the convenience of the programmer, the 
assembler provides extended mnemonic codes, 
which allow conditional branches to be 
specified mnemonically as well as through 
the use of the BC machine-instruction. 
These extended mnemonic codes specify both 
the machine branch instruction and the 
condition on which the branch is to occur. 
The codes are not part of the universal set 
of machine-instructions, but are translated 
by the assembler into the corresponding 
operation and condition combinations. 

The allowable extended mnemonic codes 
and their operand formats are shown in 
Figure 3, together with their machine- 
instruction eguivalents. Unless otherwise 
noted, all extended mnemonics shown are for 
instructions in the RX format. Note that 
the only difference between the operand 
fields of the extended mnemonics and those 
of their machine-instruction eguivalents is 
the absence of the R1 field and the comma 
that separates it from the rest of the 
operand field. The extended mnemonic list, 
like the machine-instruction list, shows 
explicit address formats only. Each 
address can also be specified as an implied 
address. 
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EXTENDED 
ICODE 



OPERAND 



MEANING 



MACHINE INSTRUCTION 



B 

BR 

NOP 

NOPR 



D2 (X2, B2) 

R2 

D2 (X2» B2 ) 

R2 



Branch Unconditional 

Branch Unconditional (RR Format) 

No Operation 

No Operation (RR Format) 



BC 15, D2 (X2, B2) 
BCR 15, R2 
BC 0, D2 (X2, B2) 
BCR 0, R2 



BH 

BL 

BE 

BNH 

BNL 

BNE 



D2 (X2, B2) 

D2 (X2, B2) 

D2 (X2, B2) 

D2 (X2, B2) 

D2 (X2, B2) 

D2 (X2, B2) 



USED AFTER COMPARE INSTRUCTIONS 

Branch on High 

Branch on Low 

Branch on Equal 

Branch on Not High 

Branch on Not Low 

Branch on Not Equal 



BC 2, D2 (X2, B2) 
BC 4, D2 (X2, B2) 
BC 8, D2 (X2, B2) 
BC 13, D2 (X2, B2) 
BC 11, D2 (X2, B2) 
BC 7, D2 (X2, B2) 



BO 
BP 
BM 
BZ 



D2 (X2, B2) 

D2 (X2, B2) 

D2 (X2, B2) 

D2 (X2, B2) 



USED AFTER ARITHMETIC INSTRUCTIONS 

Branch on Overflow 

Branch on Plus 

Branch on Minus 

Branch on Zero 



BC 1, D2 (X2, B2) 

BC 2, D2 (X2, B2) 

BC 4, D2 (X2, B2) 

BC 8, D2 (X2, B2) 



USED AFTER TEST UNDER MASK INSTRUCTION 



BO 
BM 
BZ 



D2 (X2, B2) 
D2 (X2, B2) 
D2 (X2, B2) 



Branch if Ones 
Branch if Mixed 
Branch if Zeros 



BC 1, D2 (X2, B2) 
BC 4, D2 (X2, B2) 
BC 8, D2 (X2, B2) 



Figure 3. Extended Mnemonic Codes 



The following examples illustrate 
instructions using extended mnemonic codes. 
In these examples it is assumed that the 
symbol GO is defined elsewhere in the 
program. 



1 ' ■ '■ 1 " ■ ' ■-■ 

|Name | Operation 
I h— 


| Operand | 


1 IE 


-+ 1 

140(3,6) | 


1 1 B 


140(0,6) | 


1 1 BL 


|GO(3) | 


1 1 BL 


1 GO | 


1 1 8R 

1 L.. 


14 | 
i ■ 



The first two instructions specify an 
unconditional branch to an explicit 
address The address in the first case is 
the sum of the contents of base register 6, 
the contents of index register 3, and the 
displacement 40; the address in the second 
instruction is not indexed. The third 
instruction specifies a branch on low to 
the address implied by GO as indexed by the 
contents of index register 3; the fourth 
instruction does not specify an index 
register. The last instruction is an 
unconditional branch to the address 
contained in register 4. 
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A S SEMBLE R_ IN STRUCTION STAT EMENTJ3 



Just as machine instructions are used to 
reguest the computer to perform a sequence 
of operations during program execution 
time, so assembler instructions are 
reguests to the assembler to perform 
certain operations durinq the assembly. 
Assembler-instruction statements, in 
contrast to machine- instruction statements 
do not always cause machine-instructions to 
be included in the assembled program. 
Some, such as DS and DC, generate no 
instructions but do cause storage areas to 
be set aside for constants and other data. 
Others, such as EQU and SPACE, are 
effective cnly at assembly time; they 
generate nothing in the assembled program 
and have no effect on the Location Counter. 



SYMBOL DEFINITION INSTRUCTION 



EQU — EQUATE SYMBOL 

The EQU instruction is used to define a 
symbol by assigning to it the attributes of 
an expression in the operand field. The 
format of the EQU instruction statement is 
as follows: 



r — ■ — r 

| Name |Operation 


| Operand 
-f 


.. ., , 
1 

1 


h- H 

|A symbol | EQU 
i i 


|An expression 

L 


1 

1 



The following is a list of all the 
assembler instructions. 

Sym bol Definiti on In structi on 
EQU - Eguate Symbol 

Data Definiti on In structions 

DC - Define Constant 

DS - Define Storage 

CCW - Define Channel Command Word 

* Program Sectioning and Li nki ng 
Instructions 
START - Start Assembly 
CSECT - Identify Control Section 
DSECT - Identify Dummy Section 
ENTRY - Identify Entry-Point Symbol 
EXTRN - Identify External Symbol 



The expression in the operand field must 
be absolute or relocatable. Any symbols 
appearing in the expression must be 
previously defined. 

The symbol in the name field is given 
the same attributes as the expression in 
the operand field. The length attribute of 
the symbol is that of the leftmost (or 
only) term of the expression. The value 
attribute of the symbol is the value of the 
expression . 

The EQU instruction is the means of 
eguating symbols to register numbers, 
immediate data, and other arbitrary values 
The following examples illustrate how this 
might be done: 



* Base Register Instructions 

USING - Use Base Address Register 
DROP - Drop Base Address Register 

Li sting. Control Instructions 
TITLE - Identify Assembly Output 
EJECT - Start New Page 
SPACE - Space Listing 
PRINT - Print Optional Data 

Program Control Inst ruct ions 

ICTL - Input Format Con-trol 

ISEQ - Input Seguence Checking 

ORG - Set location Counter 

LTORG - Begin Literal Pool 

CNOP - Conditional No Operation 

END - End Assembly 

RE PRO - Reproduce Following Card 

PUNCH - Punch a Card 

XFR - Generate a Transfer Card 



r 

| Name 
I 


■i ■' 

| Operation 

— 1 


r — i 

| Operand | 


| REG2 


1 EQU 


H H 

|2 (general register) | 


|TEST 
i. , 


|EQU 


| X' 3F « (immediate data) j 
■ ■ 



To reduce programming time, the 
programmer can eguate symbols to frequently 
used expressions and then use the symbols 
as operands in place of the expressions 
Thus, in the statement 



i 1 1 

| Name JOperation |Operand 



| FIELD |EQU 



I I 

| ALPHA-BETA + GAMMA | 



* Discussed under Addr ess ing -- Program 
Sectioning and Linking . 
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FIELD is defined as ALPHA-BETA+GAMMA and 
may be used in place of it. Note, however, 



that ALPHA, BETA , and GAMMA must all be 
previously defined. 



DATA DEFINITION INSTRUCTIONS 

There are three data definition instruction 
statements: Define Constant (DC), Define 
Storaqe (DS) , and Define Channel Command 
Word (CCti) . 

These statements are used to enter data 
constants into storage, to define and 
reserve areas of storage, and to specify 
the contents of channel command words. The 
statements may be named by symbols so that 
other program statements can refer to the 
fields generated from them. The DS 
instruction is written in the same format 
as the DC instruction and may specify some 
or all of the information that the DC 
instruction provides. Only the function 
and treatment of the statements vary. The 
DC instruction is presented first and 
discussed in more detail than the DS 
instruction. 



DC — DEFINE CONSTANT 

The DC instruction is used to provide 
constant data in storage. It may specify 
one constant or a series of constants. 
Furthermore, a variety of constants may be 
specified: binary fixed-point, 
floating-point, decimal, hexadecimal, 
character, and storage addresses (Data 
constants are generally called constants 
unless they are created from storage 
addresses, in which case they are called 
address constants.) 

The format of the DC instruction 
statement is as follows: 



1 

| Name 

I 1 


— 1 

Operation 


r -■ 1 — 

Operand 


— i 


|A symbol 
|or blank 
1 


| ; 

DC 

L 


One operand in 
the following 
format 


j 



The operand consists of four subfields. 
They are written in the following sequence: 

12 3 4 

Dupli- Type Modifiers Constant (s) 
cation 
Factor 

The constant provided in the fourth 
subfield is described by subfields 1-3. 
Some or all of the three descriptive 
subfields may be omitted, depending on the 
constant. Note that more than one constant 



may be specified in the fourth subfield for 
most types of constants, so the programmer 
need not write a separate data definition 
for every constant desired. However, each 
constant so specified must be of the same 
type; the descriptive three subfields apply 
to all of them. No blanks may occur within 
any subfield, except in providing a 
character in a character constant. No 
blanks may occur between the subfields of 
an operand. 



The symbol that names the DC instruction 
is the name of the constant, or, if the 
instruction specifies more than one, the 
first constant. In the case of multiple 
constants, relative addressing (for 
example, SYMBOL+2) may be used to reach the 
various values. The number of bytes 
allocated to each constant can readily be 
determined from the four subfields. 

The value attributed to the symbol 
naming the DC instruction is the address of 
the leftmost byte (after alignment) of the 
constant, or the first constant where 
multiple constants are defined. The length 
attribute depends on two things: the type 
of constant being defined and the use of a 
length specification. If no length 
specification is present, the implied 
length of the constant is assumed. Should 
more than one constant be defined, the 
attributed length is the length in bytes 
(specified or implied) of the first 
constant. 

Boundary alignment also varies according 
to the type of constant being specified and 
the presence of a length specification. 
Some 'constant types are only aligned to a 
byte boundary, but the DS instruction can 
be used to force any type of word boundary 
alignment for them. This is explained 
under* DS — <■ D efine Storage . Other 
constants are aligned at various word 
boundaries (half, full, or double) in the 
absence of a length specification. For 
these constants, no boundary alignment 
occurs if length is indicated. 

Bytes that must be skipped in order to 
align the field at the proper boundary are 
not considered to be part of the constant. 
In other words, the Location Counter is 
incremented to reflect the proper boundary 
(if any incrementing is necessary) before 
the address value is established. Thus, 
the symbol naming the constant will not 
receive a value attribute that is the 
location of a skipped byte. The bytes 
skipped in aligning the constant defined by 
a DC instruction will be zeroed, because 
information is being assembled. This would 
occur, for example, in the alignment of the 
statement DC FM23'. 
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Appendix F summarizes, in chart form, 
the information concerning constants that 
is presented in this section. 

LITERAL DEFINITIONS: The reader is 
reminded that the discussion of literals as 
machine-instruction operands referred him 
to the description of the DC operand for 
the method of writing a literal operand. 
All subseguent operand specifications are 
applicable to writing literals, the only 
differences being: 

1. The literal is preceded by an = sign. 

2. The duplication factor may not be zero. 

3. S-type address constants may not be 
specified. 

Examples of literals appear throughout 
the balance of the DC instruction 
discussion . 

P.P.?r and_ Subf ield_ 1 : Dupli cat ion Fac tor 

The duplication factor must be specified by 
an unsigned decimal value. It causes the 
constant (s) to be generated the number of 
times indicated by the factor. It is 
applied after the constant has been fully 
assembled, that is, after it has been 
developed into its proper format. Note 
that, except in a literal, a duplication 
factor of zero is permitted. It is used to 



force alignment to a doubleword, full-word, 
or half-word boundary, as desired. (See 
Forcing Alignmen t under DS —Define 
S tor age.) The duplication factor may be 
omitted altogether. 

Note* If duplication is specified for an 
address constant containing a Location 
Counter reference, the value of the 
Location Counter used in each duplication 
is incremented by the length of the 
constant . 

Oper and Subfield 2: T_y_p_e 

The type subfield defines the type of 
constant being specified. From the type 
specification, the assembler determines how 
it is to interpret the constant and 
translate it into the appropriate machine 
format. The type is specified by a letter 
code as shown in Figure 4. 

Further information about these 
constants is provided in the discussion of 
the constants themselves under Operand 
Subfield U : Constant. 

Operand Subfield 3: ; Modifi ers 

Modifiers describe the length in bytes 
desired for a constant (in contrast to an 
implied length) , and the scaling and 
exponent for the constant. If multiple 
modifiers are written, they must appear in 



| CODE | 


TYPE OF CONSTANT | 


- ■ ■■ ■ ■ ■ i 

MACHINE FORMAT | 


1 c | 


Character | 


8-bit code for each character | 


1 x | 


Hexadecimal | 


4-bit code for each hexadecimal digit | 


1 B | 


Binary | 


Binary format j 


1 F 1 


Fixed-point j 


Signed, fixed-point binary format; | 
normally a full word | 


1 H | 


Fixed-point | 


Signed, fixed-point binary format; | 
normally a half word | 


1 E | 


Floating-point j 


Short floating-point format; | 
normally a full word | 


1 D | 


Floating-point | 


Long floating-point format; | 
normally a double word | 


1 P 1 


Decimal j 


Packed decimal format j 


1 z 1 


Decimal j 


Zoned decimal format | 


1 A | 


Address | 


Value of address; normally a full word | 


1 Y 1 


Address j 


Value of address; normally a half word | 


1 s | 


Address j 


Base register and displacement value; j 
a half word j 


1 V | 


Address | 


Space reserved for external symbol address; each | 


■ i 




address normally a full word | 


| Note: 
• 


The type subfield 


for a character constant may be omitted, C is assumed. | 
. _. . i 



Figure 4. Type Codes for Constants 
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this sequence: length, scale, exponent. 
Each is written and used as described in 
the following text. 

LENGTH MODIFIER: A length modifier may be 
specified for any type of constant. It is 
written as Ln, where n is an unsigned 
decimal value. The value cf n represents 
the number of bytes of storage that are 
assembled for the constant. No boundary 
alignment is provided when a length 
modifier is given. 

The maximum value permitted for a length 
modifier varies with the type of constant. 
A character may have a length up to 256 
specified, whereas the range of a 
fixed-point constant is 1 to 8 . Should the 
specified length be greater or less than 
the constant actually given, padding or 
truncation occurs as necessary. If no 
length modifier is present, the implied 
length of that type of constant is used. 
Limits on the modifiers and implied lengths 
are found in Appendix F, a summary of 
constants. 

SC AL E MODI FIER -: This modifier is written 
as Sn, where n is a decimal value. The 
decimal value may be preceded by a sign; if 
none is present, a plus sign is assumed. 
The maximum values for scale modifiers are 
summarized in Ap pend ix F. 

A scale modifier may be used with 
fixed-point (F, H) and floating-point (E, 
D) constants only. It is used to specify 
the amount of internal scaling that is 
desired, as follows. 

Scale Mod ifier for Fixed-Point Cons t an t : 
This scale modifier specifies the power of 
two by which the constant must be 
multiplied after it has been converted to 
its binary representation. It must fall 
within the range -187 to «-346. 
Multiplication of a binary number by a 
power of two causes the binary point to 
move. It has the effect of shifting the 
binary point away from its assumed position 
in the binary field, the assumed position 
being to the right of the rightmost 
position. The process is comparable to the 
movement of a decimal point in the 
multiplication of a decimal number by a 
power of ten. 

The scale modifier, then, indicates 
either of the following: 

1. the number of binary positions to be 
occupied by the fractional portion of 
the binary number, or 

2. the number of binary positions to be 
deleted from the integral portion of 
the binary number. 



A positive scale of x shifts the integral 
portion of the number x binary positions to 
the left, thereby reserving the rightmost x 
binary positions for the fractional 
portion. A negative scale shifts the 
integral portion of the number right, 
thereby deleting rightmost integral 
positions. If a s ca le mod if ier does not 
acGo_mpany„a_f ixed-^poin t co ns tant containin g 
a fractional p art, t he fra cti onal part is 
lost. For example, if the decimal portion 
of the number 987.65 is to be retained, the 
statement DC FS8'987.65' is reguired. The 
statement DC F'987.65 1 without the scale 
factor S8 retains only the integral 
portion, 987, of the number. 

In all cases where positions are lost 
because of scaling (or the lack of 
scaling) , rounding occurs in the leftmost 
bit of the lost portion. The rounding is 
reflected in the rightmost position saved. 



Scale Mod ifier, f o r Fl o atin g- Point Constant : 
Only a positive scale modifier may be used 
with a floating-point constant. It may be 
any value from 0 to 13 and indicates the 
number of hexadecimal positions that the 
fraction is to be shifted to the right. It 
is specified in this way because a 
floating-point constant is always converted 
to a fraction. This fraction is 
hexadecimally normalized, that is, with a 
high-order hexadecimal digit that is not 
zero. Because the point is then assumed to 
be to the left of the leftmost position in 
the field, and cannot be moved left, the 
fraction is shifted right. Note that this 
shift amount is in terms of hexadecimal 
positions. 

Thus, scaling that is specified for a 
floating-point constant provides an 
assembled fraction that is unnormalized , 
i.e., contains hexadecimal zeros in the 
leftmost positions of the fraction. When 
the fraction is shifted, the exponent is 
adjusted accordingly to retain the correct 
magnitude. When hexadecimal positions are 
lost, rounding occurs in the leftmost 
hexadecimal position of the lost portion. 
The rounding is reflected in the rightmost 
hexadecimal position saved. 

E X P ONE N T_ M 0 DI F IE R : This modifier is 
written as En, where n is a decimal value. 
The decimal value may be preceded by a 
sign; if none is present, a plus sign is 
assumed. The maximum values for exponent 
modifiers are summarized in Append ix._F. 

An exponent modifier may be used with 
fixed-point (F, H) and floating-point (E, 
D) constants only. The modifier denotes 
the power of 10 by which the constant is to 
be multiplied before its conversion to the 
proper internal format. 
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This modifier is not to be confused with 
the exponent of the constant itself, which 
is specified as part of the constant and is 
explained under Op erand Subfield 4: 
Constant . Both are denoted in the same 
fashion, as En. The exponent modifier 
affects each constant in the operand, 
whereas the exponent written as part of the 
constant only pertains to that constant. 
Thus, a constant may be specified with an 
exponent of +2, and an exponent modifier of 
+5 may precede the constant. In effect, 
the constant has an exponent of +7. 

Note that there is a maximum value, both 
positive and negative, listed in A ppendi x . F 
for exponents. This applies both to 
exponent modifier and exponents specified 
as part cf the constant, or to their sum if 
both are specified. 

Operand Subfield 4: _ C ons t an t 

This subfield supplies the constant (or 
constants) described by the subfields that 
precede it. A data constant (all types 
except A,Y,S,and V) is enclosed by single 
guotation marks. An address constant 
(types A, Y, S, and V) is enclosed by 
parentheses. For types F,H,E,D,P, and Z 
two or more constants may be specified in 
the subfield. The constants must be 
separated by commas and the entire seguence 
of constants must be enclosed by single 
guotation marks. Thus, the format for 
specifying the constant (s) is one of the 
following : 

Single Multiple 

Constant Const ants* 

'constant' ' constant, . . . , constant' 

(constant) 

❖Permitted for F,H,E,D,P, and Z type 
constants only. 

All constant types except character (C) , 
hexadecimal (X), binary (B), packed decimal 
(P) , and zoned decimal (Z) , are aligned on 
the proper boundary, as shown in Appendix 
F, unless a length modifier is specified. 
In the presence of a length modifier, no 
boundary alignment is performed. If an 
operand specifies more than one constant, 
any necessary alignment applies to the 
first constant only. Thus, for an operand 
that provides five full-word constants, the 
first would be aligned on a full-word 
boundary. The rest, however, would 
automatically fall on full-word boundaries 
as well. 

The total storage reguirement of an 
operand is the product of the length times 
the number of constants in the operand 
times the duplication factor (if present) 
plus any bytes skipped for boundary 
alignment of the first constant . 



If an address constant contains a 
Location Counter reference, the Location 
Counter value that is used is the storage 
address of the first byte the constant will 
occupy. If an address constant is 
specified (and it is a Location Counter 
reference) with a duplication factor, the 
constant is duplicated with a varying 
Location Counter value. 



The subseguent text describes each of 
the constant types and provides examples. 



Charac ter - Constant -- - C; Any of the valid 
256 punch combinations may be designated in 
a character constant. Only one character 
constant may be specified per operand. 
Since multiple constants within an operand 
are separated by commas, an attempt to 
specify two character constants would 
result in interpreting the comma separating 
them as a character. 



The maximum length of a character 
constant is 256 bytes. No boundary 
alignment is performed. Each character is 
translated into one byte. If no length 
modifier is given, the size in bytes of the 
character constant is egual to the number 
of characters in the constant. If a length 
modifier is provided the result varies as 
follows: 

1. If the number of characters in the 
constant exceeds the specified length, 
as many rightmost bytes as necessary 
are dropped. 

2. If the number of characters is less 
than the specified length, the excess 
rightmost bytes are filled with blanks. 

Special consideration must be given to 
representing guotation marks and ampersands 
as characters. Each single guotation mark 
or ampersand desired as a character in the 
constant must be represented by a pair of 
single guotation marks or ampersands. The 
double guotation marks and ampersands count 
as one character. Only one single 
quotation mark or ampersand appears in 
storage. 

In the following example, the length 
attribute of FIELD is 12: 



r r 

| Name | Operation 
I H 


| Operand 


1 


| FIELD |DC 
■ i 


H 

IC'TOTAL IS 110' 


H 

1 

■ 



However, in this next example, the 
length attribute is 15, and three blanks 
appear in storage to the right of the zero: 
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1 ■ T 

|Name |Operation 
1 4 


— r 

|Operand 
-+ 


— i 
1 


| FIELD |DC 

L L 


|CL15'TOTAL IS 110" 


— \ 

1 
■ 



In the next example, the length 
attribute of FIELD is 12, although 13 
characters appear in the operand. The two 
ampersands count as only one byte. 



I T 1 1 

|Name (Operation |Operand | 

I H 1 1 

| FIELD |DC IC'TOTAL is SS10' | 

III I 
i i t i 

Note that in the next example, a length 
of four has been specified, but there are 
five characters in the constant 



i r 1 1 

|Name (Operation (Operand | 

I H H 1 

| FIELD | DC |3CL4'ABCDE" | 
i i j . i 



The generated constant would be: 

ABCDABCDABCD 

On the other hand, if the length had 
been specified as six instead of four, the 
generated constant would have been: 

ABCDE ABCDE ABCDE 

Note that the same constant could be 
specified as a literal. 



i 1 1 1 

| Name (Operation |Operand | 

I 4 H 1 

| |MVC |AREA(12) , =3CL4' ABCDE 1 | 
i i i , i 



Hexade cima l Co nstant — X: A hexadecimal 
constant is comprised of one or more of the 
hexadecimal digits, which are 0-9 and A-F. 
Only one hexadecimal constant may be 
specified per statement. The maximum 
length of a hexadecimal constant is 256 
bytes (5 12 hexadecimal digits). No word 
boundary alignment is performed. 

Constants that contain an even number of 
hexadecimal digits are translated as one 
byte per pair of digits. If an odd number 
of digits is specified, a hexadecimal zero 
is paired with the leftmost digit to make 
up another byte. 

If no length modifier is given, the 
implied length of the constant is half the 
number of hexadecimal digits in the 
constant (assuming that a hexadecimal zero 
is added to an odd number of digits). If a 



length modifier is given, the constant is 
handled as follows: 

1. If the number of hexadecimal digit 
pairs is greater than the specified 
length, the extra leftmost bits 
(and/or bytes) are dropped. 

2. If the number of hexadecimal digit 
pairs is less than the specified 
length, the necessary bits (and/or 
bytes) are added to the left and 
filled with hexadecimal zeros. 

An eight-digit hexadecimal constant 
provides a convenient way to set the bit 
pattern of a full binary word. The 
constant in the following example would set 
the first and third bytes of a word to 1s: 



1 '1 

|Name (Operation 


~r 

| Operand 


■" ~i 
1 


j 1 

1 1 DS 
|TEST |DC 
t i 


H 

| OF 

| X' FF00FF00' 
i 


\ 

1 
1 



The DS instruction sets the location 
counter to a full-word boundary. 

The next example uses a hexadecimal 
constant as a literal and inserts 1s into 
bits 24 through 31 of register 5. 



1 — IT 

| Name (Operation 


T " — 

| Operand 


i 
1 


1 1 

1 1 ic 


-+ 

| 5,=X'FF' 

i ... 


1 

1 

...... i 



In the following example, the digit A 
would be dropped, because five hexadecimal 
digits are specified for a length of two 
bytes : 



r — i — 

| Name (Operation 


r — ■■■ i 
| Operand | 

-+ : H 


I 1 

| ALPHACON |DC 

1 1 

i i 


|3XL2'A6F4E' | 
1 1 

-JL-. _ 1 



The resulting constant would be 6F4F, 
which would occupy the two bytes specified 
by the length modifier (L2) . It would be 
generated three times, as reguested by the 
duplication factor. Had it been specified 
as X'A^FAE 1 , the resulting constant would 
have contained a hexadecimal zero in the 
leftmost position: 

0A6F4E 

Bina ry Constant — B : A binary constant is 
written using' Is and 0s enclosed in 
quotation marks. Only one binary constant 
may be specified in a statement. 
Duplication and length may be specified. 
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The maximum length of a binary constant is 
256 bytes. 

The implied lenqth of a binary constant 
is the number of bytes occupied by the 
constant including the padding necessary to 
complete a byte. The padding bit used is a 
0. Padding or truncation takes place on 
the left. 

The following example shows the coding 
used to designate a binary constant. 



1 — — 

| Name 

1 


— I — 

| Operation 
— 1 


-T — ' 

| Operand 
H 


i 

1 

1 


IBCON 

IBTEUNC 

IBPAD 
i 


| DC 
|DC 
|DC 


|B« 11011101 » 
|BL1» 1C 01 0001 1 ' 
|BL1M01» 
_j. . 


1 

1 

1 
i 



BCON would have a length attribute of 
one. 

BTRUNC would assemble with the leftmost 
bit truncated, as follows: 

0010001 1 

BPAD would assemble with five zeros as 
padding, as follows: 

00000101 

Fixed -Poi nt Con sta nts — F and H : A 
fixed-point constant is written as a 
decimal number. The number may be an 
integer, a fraction, or a mixed number 
(i.e., one with integral and fractional 
portions) and may be followed by a decimal 
exponent if desired. The format of the 
constant is as follows: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number, or it may be omitted, 
in which case the number is assumed to 
be an integer. A positive sign is 
assumed if an unsigned number is 
specified Unless a scale modifier 
accompanies a mixed number or fraction, 
the fractional portion is lost, as 
explained under Su bfield 3: Modifiers. 

2. The exponent is optional. If 
specified it is written immediately 
after the number as En, where n is an 
optionally signed decimal value 
specifying the exponent of the factor 
10. The exponent may be in the range 
-85 to +75. If an unsigned exponent is 
specified, a plus sign is assumed. The 
exponent causes the value of the 
constant to be adjusted by the power of 
10 that it specifies before the 
constant is converted to its binary 
form . 



The number is converted to its binary 
equivalent and is assembled as a full-word 
or half-word, depending on whether the type 
is specified as F or H. It is aligned at 
the proper full-word or half-word boundary 
if a length is not specified. An implied 
length of four bytes is assumed for a 
full-word (F) and two bytes for a half-word 
(H) . However, any length up to and 
including eight bytes may be specified for 
either type of constant by a length 
modifier, in which case no boundary 
alignment occurs. 



Maximum and minimum values, exclusive of 
scaling, for fixed-point constants are: 



Length Max M in 

8 ~ 2*3-1 -2^3 

4 231-1 -23i 

2 215-1 -215 

1 27-1 -27 



The binary number occupies the rightmost 
portion of the field in which it is placed. 
The unoccupied portion (i.e., the leftmost 
bits) is filled with the sign. That is, 
the setting of the bit designating the sign 
is the setting for the bits in the unused 
portion of the field. If the value of the 
number exceeds the length, the necessary 
leftmost bits are dropped. A negative 
number is carried in 2s complement form. 

If the presence or absence of a scale 
modifier is such that the rightmost portion 
of the number must be dropped, rounding 
occurs. A duplication factor is applied 
after the constant is converted to its 
binary format and assembled into the proper 
number of bytes. 

A field of three full-words is generated 
from the statement shown here. The 
specified numbers occupy the rightmost 
three bytes, with the sign propogated 
through the rest of the word. This 
constant then appears three times in 
storage. The location attribute of CONWRD 
is the address of the leftmost byte of the 
first word, and the length attribute is 
four, the implied length for a full-word 
fixed-point constant. The expression 
CONWRD+4 could be used to address the 
second constant (second word) in the field. 



1 - - 

| Name 

| 


~r — r - - 

| Operation | Operand 


i 
1 

H 


ICONWRD 
i 


_j h 

|DC |3F«658474» 
i ... . .... i . 


1 
j 



The next statement causes the generation 
of a two-byte field containing a negative 
constant. Notice that scaling has been 
specified in order to reserve six bits for 
the fractional portion of the constant. 
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I Name 



HALFCON 



"i r 1 ' 

|Operaticn |Operand 

+ 

DC 



| HS6 «-25.93' 



The next constant (3.50) is multiplied 
by 10 to the -2 before being converted to 
its binary format. The scale modifier 
reserves eight bits for the fractional 
portion. 



Name 



-\ 1 

|Operaticn |Operand 



IFULLCON |DC 
i 



|HS8«3.50E-2« 



The same constant could be specified as 
a literal: 



i r 

|Name | Operation 


— r 

| Operand 


1 

1 


1 -f 

1 1 AH 

L — L. 


H 

| 7, =HS8'3.50E-2' 


1 

1 
■ 



The final example specifies three 
constants. Notice that the scale modifier 
requests four bits for the fractional 
portion of each constant. The four bits 
are provided whether or not the fraction 
exists. 



| Name 

I 

ITHREECON | DC 
i i 



| Operation | Operand 
H h 



4 1 

| FS4 1 10,25. 3, 100' | 



Floating-Point Constants — E and D : A 
floating-point constant is written as a 
decimal number, which may be followed by a 
decimal exponent, if desired; The number 
may be an integer, a fraction, or a mixed 
number (i.e., one with integral and 
fractional portions) . The format of the 
constant is as follows: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number, or it may be omitted, 
in which case, the number is assumed to 
be an integer. A positive sign is 
assumed if an unsigned number is 
specified. 

2. The exponent is optional. If 
specified it is written immediately 
after the number as En, where n is an 
optionally signed decimal value 
specifying the exponent of the factor 
10. The exponent may be in the range 
-85 to +75. If an unsigned exponent is 
specified, a plus sign is assumed. 



Machine format for a floating-point 
number is in two parts: the portion 
containing the exponent, which is sometimes 
called the characteristic, followed by the 
portion containing the fraction, which is 
sometimes called the mantissa. The number 
specified as a floating-point constant must 
be converted to a fraction before it can be 
translated into the proper format. For 
example, the constant 27.35E2 represents 
the number 27.35 times 10 to the 2nd. 
Represented as a fraction, it would be 
.2735 times 10 to the 4th, the exponent 
having been modified to reflect the 
shifting of the decimal point. The 
presence of an exponent modifier, which 
will pertain to each constant in the 
operand, may affect the exponent (see 

Operand Subfield 3: M odifiers ) . Thus, the 

exponent is also altered before being 
translated into machine format. Once the 
constant is converted into the proper 
fraction and exponent, each is translated 
into its binary equivalent and arranged in 
machine floating-point format. 



The translate 
full word or a d 
whether the type 
The characterist 
and the fraction 
positions. The 
proper word or d 
length is not sp 
of four bytes is 
(E) and eight by 
word (D) . Howev 
including eight 
either type of c 
modifier, in whi 
alignment occurs 



d constant is placed in a 
ouble word, depending on 

is specified as E or D. 
ic occupies the first byte, 

takes up the remaining bit 
constant is aligned at the 
ouble word boundary if a 
ecified. An implied length 

assumed for a full word 
tes is assumed for a double 
er, any length up to and 
bytes may be specified for 
onstant by a length 
ch case no boundary 



Within the portion of the floating-point 
field allocated to the fraction, the 
hexadecimal point is assumed to be to the 
left of the leftmost hexadecimal digit, and 
the fraction occupies the leftmost portion 
of the field. The fraction is normalized 
(no leading hexadecimal zeros) , unless 
scaling is specified. If the rightmost 
portion of the fraction must be dropped 
because of length or scale modifiers, 
rounding will occur. Negative fractions 
are carried in true representation, not in 
the 2s complement form. 



Any of the following statements could be 
used to specify 46.415 as a positive, 
full-word, floating-point constant; the 
last is a machine-instruction statement 
with a literal operand. Note that the last 
two constants contain an exponent modifier. 
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r — r — r n 

|Name | Operation | Operand | 
iii i 


1 | DC 


| E' 


46.415' 




1 1 DC 


| E» 


46415E-3' 




1 1 DC 


|E' 


+464. 15E-1 « 




1 1 DC 


| E' 


+. 46415E+2' 




1 1 DC 


| EE2' .46415 ' 




1 i AE 


I 6, 


=EE2'. 46415' 




i ■ 


i 




i 



Each of the following would be generated 
as doublerword floating-point constants. 



|Name |Operation (Operand 



j FLOAT | DC 



| DE+4' +46, -3. 729 ,+473' 



Decimal Constants — P and Z: 



constant i 
decimal va 
plus sign 
may be wri 
omitted, 
may not be 
The maximu 
16 bytes, 
performed. 



s writte 
lue. If 
is assum 
tten whe 
Scaling 

specifi 
m length 

No word 



n as a signed 

the sign is o 
ed. The decim 
rever desired 
and exponent m 
ed for decimal 
of a decimal 
boundary alig 



decimal 
or unsigned 
mitted, a 
al point 
or may be 
odif iers 

constants, 
constant is 
nment is 



The placement of a decimal point in the 
definition does not affect the assembly of 
the constant in any way, because, unlike 
fixed-point and floating-point constants, a 
decimal constant is not converted to its 
binary equivalent. The fact that a decimal 
constant is an integer, a fraction, or a 
mixed number is not pertinent to its 
generation. Furthermore, the decimal point 
is not assembled into the constant. The 
programmer may determine proper decimal 
point alignment either by defining his data 
so that the point is aligned or by 
selecting machine- instructions that will 
operate on the data properly (i.e., shift 
it for purposes of alignment) . 

If zoned decimal format is specified 
(Z) , each decimal digit, is. translated into 
one byte. The translation is done 
according to the character set shown in 
Appendix A. The rightmost byte contains 
the sign as well as the rightmost digit. 
For packed decimal format (P), each pair of 
decimal digits is translated into one byte. 
The rightmost digit and the sign are 
translated into the rightmost byte. The 
bit configuration for the digits is 
identical to the configurations for the 
hexadecimal digits 0-9 as shown in 
Hexadecimal Self-Defin i ng Term . For both 
packed and zoned decimals, a plus sign is 
translated into the hexadecimal digit C, 
and a minus sign into the digit D. 

If an even number of packed decimal 
digits is specified, one digit will be left 



unpaired, because the rightmost digit is 
paired with the sign. Therefore in the 
leftmost byte, the leftmost four bits will 
be set to zeros and the rightmost four bits 
will contain the odd (first) digit. 

If no length modifier is given, the 
implied length for either constant is the 
number of bytes the constant occupies 
(taking into account the format, sign, and 
possible addition of zero bits for packed 
decimals) . If a length modifier is given, 
the constant is handled as follows: 

1. If the constant requires fewer bytes 
than the length specifies, the 
necessary number of bytes is added to 
the left. For zoned decimal format, 
the decimal digit zero is placed in 
each added byte. For packed decimals, 
the bits of each added byte are set to 
zero. 

2. If the constant requires more bytes 
than the length specifies, the 
necessary number of leftmost digits or 
pairs of digits is dropped, depending 
on which format is specified. 

Examples of decimal constant definitions 
follow. 



1 — T 

| Name | Operation 


~i — 

| Operand 




h 1 

1 FIRST | DC 
| SECOND | DC 
| THIRD |DC 
IFOORTHI DC 
i I 


-+ 

|P' +1.25' 

|Z'-543' 

| Z' 79. 68' 

| PL3' 79.68' 

i. 





FIRST would be assembled in two bytes, 
with the one on the right containing the 
positive sign and the five specified* 
SECOND would require three bytes; four 
bytes would be assembled for THIRD. The 
length of three specified for FOORTH would 
be filled with zeros on the left paired 
with the seven, and the assumed plus - sign 
paired with the eight -in the rightmost 
byte. 

The following example illustrates the 
use of a packed decimal literal. 



1 i 

Name | Operation | Operand 
f 



|0NPK 



+— 

|O0TAREA,=PL2'+25' 



ADDRESS CONSTANTS ; An address constant is 
a storage address that is translated into « 
constant Address constants are normally 
used for initializing base registers to 
facilitate the addressing. of storage. 
Furthermore, they provide the means of 
communicating between control sections of ; 
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multisection program. However, storage 
addressing and control section 
communication are also dependent on the use 
of the USING assembler instruction and the 
loading of registers. Coding examples that 
illustrate these considerations are 
provided in Programming with the Using 
Instruction . 

An address constant, unlike other types 
of constants, is enclosed in parentheses 
There are four types of address constants: 
A, Y, S, and V. 



Com plex Relocatable Expressions : These 
expressions contain two or three unpaired 
relocatable terms or a negative relocatable 
term in addition to any absolute or paired 
relocatable terms that may be present. A 
complex relocatable expression can only be 
used to specify an A-type or Y-type address 
constant. In contrast to relocatable 
expressions, complex relocatable 
expressions may represent a negative value. 
A complex relocatable expression might 
consist of external symbols (which cannot 
be paired) and designate an address in an 
independent assembly that is to be linked 
and loaded with the assembly containing the 
address constant. 



A-T ype Address Constant : This constant is 
specified as an absolute, relocatable, or 
complex relocatable expression. (Remember 
that an expression may be single term or 
multiterm.) The value of the expression is 
calculated as explained in the General 
Info rmation section, under Evaluation of 
Expressions. The maximum value allowed in 
this case, however, is 2 31 -1. The implied 
length of an A-type constant is four bytes, 
and the value is placed in the rightmost 
portion. Alignment is to a full-word 
boundary, unless a length is specified. A 
length modifier may be used, in which case 
no alignment will occur. The length that 
may be specified depends on the type of 
expression used for the constant; a length 
of 1-4 bytes may be used for an absolute 
expression, while lengths of 3 and 4 bytes 
may be used for a relocatable or complex 
relocatable expression. 

The A-type address constant can be used 
to reference external data, in which case 
EX TEN and ENTRY points are required. 

In this example, ADEND will be assembled 
as the value (or the address of the 
leftmost byte) of DUMP. 



1 

|Name 


T 

| Operation 


T 

JOperand 


i 
1 

1 


| 

| ADEND 
■ 


-+ 

| DC 
i, 


H 

| A (DUMP) 

... ... . 


1 
i 



In the following example, the field 
generated from the statement named ACONST 
contains a constant which occupies four 
bytes. Note that there is a Location 
Counter reference. The value of the 
Location Counter will be the address of the 
first byte allocated to the constant. The 
second statement shows the same constant 
specified as a literal (i.e., address 
constant literal) . 



1 ■ 

| Name 


— ' 1 - " 

Operation 
| 


■T 11 " 1 

| Operand | 


1 

| ACONST 

1 

L. 


DC 
L 

i. 


H 1 

| A(*+4096) | 
| 4,=A(*+4096) | 

. L 1 



Note : When the Location Counter reference 
occurs in a literal, as in the load 
instruction above, the value of the 
Location Counter is the address of the 
first byte of the instruction. 

Y-Type Address Constan t: A Y-type address 
constant has the characteristics and format 
of the A-type constant discussed above 
except for the following: 

1. The constant is assembled as a 16-bit 
value and aligned to a half-word 
boundary. 

2. The implied length is two bytes. 

3. If length specification is used, a 
length of two to four bytes may be 
designated for a relocatable or complex 
expression and 1 to 4 bytes for an 
absolute expression. 

S-Ty'pe Address Constant : The S-type 
address constant is used to store an 
address in base-displacement form. 

The constant may be specified in two 
ways: 

1. As an absolute or relocatable 
expression, e.g., S (BETA) . 

2. As two absolute expressions, the first 
of which represents the displacement 
value and the second, the base 
register, e.g., S(400(13)). 

The address value represented by the 
expression in (1) will be broken down by 
the assembler into the proper base register 
and displacement value. An S-type constant 
is assembled as a half word and aligned on 
a half-word boundary. The leftmost four 
bits of the assembled constant represents 
the base register designation, the 
remaining 12 bits the displacement value. 

If length specification is used, only 
two bytes may be specified. S-type address 
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constants may not be specified as literals. 
A duplication factor may not be used. 

V-Type Address Constant ; This constant is 
used to reserve storage for the address of 
an external symbol that is used in 
branching to other programs. A Vr-type 
constant may not be used for external data 
references. The constant is specified as 
one relocatable symbol, which need not be 
identified by an EXTRN statement. Whatever 
symbol is used is assumed to be an external 
symbol by virtue of the fact that it is 
supplied in a V-type address constant. 

Note that specifying a symbol as the 
operand of a V-type constant does not 
constitute a definition of the symbol for 
this assembly. Until the program is 
loaded, the value of the assembled constant 
is zero. The implied lenqth of a V-type 
address constant is four bytes, and 
boundary alignment is to a full word. A 
length modifier may be used to specify a 
length of either three or four bytes, in 
which case no such boundary alignment 
occurs. 

In the following example, four bytes 
will be reserved on a full-word boundary, 
and filled with zeros until loading time. 



■ 1 1 1 

| Name | Operation | Operand | 

J h 1 1 

|VCCNST |DC | V (SORT) | 
I I I i 



DS — DEFINE STORAGE 

The DS instruction is used to reserve areas 
of storage and to assign names to those 
areas. The use of this instruction is the 
preferred way of symbolically defining 
storage for work areas, input/output areas, 
etc. The size of a storage area that can 
be reserved by using the DS instruction is 
limited only by the maximum value of the 
Location Counter. Because the maximum 
length specification is 256, an area larger 
than 256 must be specified with a 
duplication factor. For example, the 
statement DS 2CL200 can be used to reserve 
400 positions of main storage. 



1 

| Name 

I 


r — 
| Operation 


— i 1 

| Operand | 


|A symbol 

|or blank 

1 

1 

1 
• 


| DS 

i . ., 


— ! 1 

10ne operand | 
| written in the | 
| format described | 
j in the following j 
jtext j 
i i 



The format of the DS operand is 
identical to that of the DC operand; 



exactly the same subfields are employed and 
are written in exactly the same seguence as 
they are in the DC operand, with the 
following exception: 

The specification of data (subfield 4) 
is optional in a DS operand, but it is 
mandatory in a DC operand. 

If a DS operand specifies a constant in 
subfield 4, (and no length is specified in 
subfield 3) the assembler determines the 
length of the data and reserves the 
appropriate amount of storage. It does not 
ass emble ■ the - constant . The ability to 
specify data and have the assembler 
calculate the storage area that would be 
required for such data is a convenience to 
the programmer. If he knows the general 
format of the data that will be placed in 
the storage area during program execution 
all he needs to do is show it as the fourth 
subfield in a DS operand. The assembler 
then determines the correct amount of 
storage to be reserved, thus relieving the 
programmer of length considerations. 

If the DS instruction is named by a 
symbol, its value attribute is the location 
of the leftmost byte of the reserved area. 
The length attribute of the symbol is the 
length (implied or explicit) of the type of 
data specified. Any positioning required 
for aligning the storage area to the proper 
type of boundary is done before the address 
value is determined. Because no data is 
assembled at this time, skipped bytes are 
not zeroed. 

Each field type (e.g., hexadecimal, 
character, floating-point) is associated 
with certain characteristics (these are 
summarized in Appen dix F ) . The associated 
characteristics will determine which 
field-type code the programmer selects for 
the DS operand and what other information 
he adds, notably a length specification or 
a duplication factor. For example, the E 
floating-point field and the F fixed-point 
field both have an implied length of four 
bytes. The leftmost byte is aliqned to a 
full-word boundary. Thus, either code 
could be specified if it were desired to 
reserve four bytes of storaqe aligned to a 
full-word boundary. To obtain a lenqth of 
eiqht bytes, one could specify either the E 
or F field type with a lenqth modifier of 
eiqht. However, a duplication factor would 
have to be used to reserve a larger area, 
because the maximum length specification 
for either type is eight bytes. Note also 
that specifying length would cancel any 
special boundary alignment. 

In contrast, packed and zoned decimal (P 
and Z) , character (C) , hexadecimal (X) , and 
binary (B) fields have an implied length of 
one byte. Any of these codes, if used. 
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would have to be accompanied by a length 
modifier, unless just one byte is to be 
reserved. Although no alignment occurs, 
the use of these field types permits 
greater latitude in length specifications 
the maximum for these types being 256 
bytes. However, if a symbol that is 
defined by a P or Z field type with a 
length modifier greater than 1 6 is used as 
an operand in a decimal machine 
instruction, a length error will occur. 
Unless a field of one byte is desired, 
either the length must be specified for the 
C, X, P, Z, or B field types, or else the 
data must be specified (as the fourth 
subf ield) , so that the assembler can 
calculate the length. 



Spe cial Uses of the Duplication - Factor 



FO RGING ALIGNMENT : The Location Counter 
can be forced to a double-word, full-word, 
or half-word boundary by using the 
appropriate field type (e.g., D, F , or H) 
with a duplication factor of zero. This 
method may be used to obtain boundary 
alignment that otherwise would not be 
provided. For example, the following 
statements would set the Location Counter 
to the next double-word boundary and then 
reserve storage space for a 128-byte field 
(whose leftmost byte would be on a 
double-word boundary) . 



To define four 10-byte fields and one 
100-byte field, the respective DS 
statements might be as follows: 



1 

|Name 
| 


T 

1 Operation 
-+ 


— 1 — 

| Operand 


i 
1 

1 


|F IELD 
| AREA 
i 


| DS 
| DS 

_L _. _.. _ „, 


— f 

| 4CL 1 0 
|CL100 

i _ . 


1 

1 
j 



Although FIELD might have been specified 
as one 4 0-byte field, the preceding 
definition has the advantage of providing 
FIELD with a length attribute of 10. This 
would be pertinent when using FIELD as a 
machine- instruction operand governed by a 
length consideration. 



Additional examples of DS statements are 
shown below: 



i 1 1 

| Name | OperationJOperand 
j_ 



ONE 
TWO 

THREE 

FOUR 

FIVE 



DS 
DS 

DS 
DS 
DS 



CL80(one 80-byte field, 
| length attribute of 80) 
|80C(80 one-byte fields, 
| length attribute of 
| one) 

|6F(six full words, length 

| attribute of four) 

|D (one double word, length 

| attribute of eight) 

|4H(four half-words, 

j length attribute of 

I two) 



Note : A DS statement causes the storage 
area to be reserved but not set to zeros. 
The programmer should not assume that the 
area will contain zeros when the program is 
loaded. 



I 

| Name 


~i 

lOperation 
_j 


T 

1 Operand 


1 


1 

1 

| AREA 
i 


| DS 
IDS 

L , 


H 

|0D 

ICL128 
. i - 


1 

1 
1 



DE FINING - FIELDS O F AN AREA: A DS 
instruction with a duplication factor of 
zero can be used to assign a name to an 
area of storage without actually reserving 
the area. Additional DS and/or DC 
instructions may then be used to reserve 
the area and assign names to fields within 
the area (and generate constants if DC is 
used) . 



For example, assume that 80-character 
records are to be read into an area for 
processing and that each record has the 
following format: 



Positions 5-10 
Positions 11-30 
Positions 31-36 
Positions 47-54 
Positions 55-62 



Payroll Number 
Employee Name 
Date 

Gross Wages 
Withholding Tax 



The following example illustrates how DS 
instructions might be used to assign a name 
to the record area, then define the fields 
of the area and allocate the storage for 
them. Note that the first statement names 
the entire area by defining the symbol 
RDAREA; the statement gives RDAREA a length 
attribute of 80 bytes, but does not reserve 
any storage. Similarly, the fifth 
statement names a 6-byte area by defining 
the symbol DATE; the three subseguent 
statements actually define the fields of 
DATE and allocate storage for them. The 
second, ninth, and last statements are used 
for spacing purposes and, therefore, are 
not named. 
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I Name 
I 


| Operation 


| Opera 
-H 


| RDAREA 


.-1 

IDS 


| 0CL80 


| 


IDS 


|CL4 


IPAYNO 


IDS 


|CL6 


| NAME 


|DS 


|CL20 


IDATE 


IDS 


|0CL6 


|DAY 


IDS 


|CL2 


| MONTH 


| DS 


|CL2 


| YEAR 


IDS 


|CL2 


1 


IDS 


|CL10 


|GROSS 


| DS 


|CL8 


| FEDTAX 


IDS 


|CL8 


1 


IDS 


|CL18 



CCW — DEFINE CHANNEL COMMAND WORD 

The CCW instruction provides a convenient 
way to define and generate an eight-byte 
channel command word aligned at a 
double-wcrd boundary. The format of the 
CCW instruction statement is: 



1 , 

Name | Operationl Operand 



A symbol|CCW 
|or blank| 



| Four operands, 

| separated by commas, 

I specifying the con- 

| tents of the channel 

| command word in 

| the format 

| described in the 

| following text 

-JL 



All fcur operands must appear. They are 
written, from left to right, as follows: 

1. An absolute expression that specifies 
the command code. This expression's 
value is right- justified in byte 1. 



1 T 

|Name |Operation 
1 1 


T 

| Operand 
-+ 


— i 
1 

\ 


| |CCW 

L „..L_. .... 


|2,READAREA,X'48«,80 


1 

... .i 



Note that the third operand sets bits 
37-39 to zero, as reguired. The bit 
pattern of this operand is as follows: 



32-35 
0100 



36-39 
1000 



If there is a symbol in the name field 
of the CCW instruction, it is assigned the 
address value of the leftmost byte of the 
channel command word. The length attribute 
of the symbol is eight. The internal 
machine format of a channel command word 
is: 



1 ■ ■ T~ 

|Byte | 


T 

Bits | 


Usage 




| +- 

1 1 I 


0-7 | 


Command code 




1 2-4 | 


8-31 | 


Data address 




15 | 


32-36 | 


Flags 




1 1 


37-39 | 


Must be zero 




16 | 


40-47 | 


Set to zero 




1 7-8 | 
i i 


48-63 | 
• 


Count 


■ 


LISTING 


CONTROL 


INSTRUCTIONS 





The listing control instructions are used 
to identify an assembly listing and 
assembly output cards, to provide blank 
lines in an assembly listing, and to 
designate how much detail is to be included 
in an assembly listing. In no case are 
instructions or constants generated in the 
object program. If listing control 
statements are used within a DSECT, they 
are treated as comments and not executed. 
For example, if the EJECT instruction is 
used within a DSECT, it does not cause the 
listing to be ejected. 



2. An absolute or relocatable expression 
specifying the data address. The value 
of this expression is right- justified 
in bytes 2-4. 

3. An absolute expression that specifies 
the flags for bits 32-36 and zeros for 
bits 37-39. The value of this 
expression is right- justified in byte 
5. (Byte 6 is set to zero.) 

4. An absolute expression that specifies 
the count. The value of this 
expression is right- justified in bytes 
7-8. 

The following is an example of a CCW 
statement: 



TITLE — IDENTIFY ASSEMBLY OUTPUT 

The TITLE instruction enables the 
programmer to identify the assembly listing 
and assembly output cards. The format of 
the TITLE instruction statement is as 
follows: 



1 

| Name 


-i 

| Operation 


T - 1 

1 Operand | 


\ 

| Name 
| or 
| blank 
1 

i ._ 


H 

| TITLE 

1 

1 

1 

.J.. 


-+ 1 

|A sequence of char- | 
lacters, enclosed in | 
(single guotation | 
| marks | 
i ... i 
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If the first TITLE statement in a 
program appears before the START statement, 
it may contain an entry in the name field. 
This entry may contain one to four 
alphabetic or numeric characters in any 
combination. Any additional characters are 
ignored. The contents of the name field 
are punched into columns 73-76 of all the 
output cards for the program, except in 
those cards produced by means of a REPRO or 
PUNCH assembler instruction. An entry in 
the name field of any other TITLE statement 
is ignored. 



The operand field of a TITLE statement 
may contain up to 100 characters, enclosed 
in single guotation marks. A continuation 
card may be used, if necessary. Any 
characters in excess of 100 are ignored. 
The contents of the operand field are 
printed at the top of each page of the 
assembly listing. The TITLE statement 
itself does not appear in the source 
listing. 



A program may contain more than one 
TITLE statement. Each TITLE statement 
provides the heading for pages in the 
assembly listing that follows it, until 
another TITLE statement is encountered. 
Each TITLE statement encountered after the 
first statement causes the listing to be 
advanced to a new page (before the heading 
is printed) . 



For example, if the following statement 
is the first TITLE statement to appear in a 
program, and it appears before the START 
statement: 



i r r 1 

|Name | Operation | Operand | 
I f. H 1 

JPGM1 | TITLE | * FIRST HEADING ' | 
i 1 i i 



then PGM 1 is punched into all of the output 
cards (columns 73-76) , except those 
produced by a REPRO or PUNCH statement, and 
this heading appears at the top of each 
page: FIRST" HEADING. 

If the following statement occurs later 
in the same program: 



i 1 1 1 

| Name | Operation ) Operand | 

I V 1 1 

| | TITLE | 'A NEW HEADING* | 
i 1 i j 



then PGM 1 is still punched into the output 
cards, but each following page begins with 
the heading: A NEW HEADING. 



EJECT — START NEW PAGE 

The EJECT instruction affects only the 
assembly listing and provides a convenient 
way to separate program routines in the 
listing. This instruction causes the 
remainder of the present page to be skipped 
and the listing to continue at the top of 
the next page, below the heading line. If 
the ejection occurs at the first line of 
the page, the entire page is skipped. 

If two or more EJECT instructions are 
issued in succession, a complete page is 
skipped for each EJECT after the first, and 
the listing continues on the page that is 
in printing position after the last EJECT 
has been executed. Each page that is 
skipped is printed with a heading line, 
however. 

The format of the EJECT instruction 
statement is: 



r " 
| Name 


T 

| Operation 
_j 


T — 

|Operand 


n 
1 

— 1 


I 

| Blank 

I 
I 


| EJECT 
I 

I 
i 


H 

|Not used; any 
loperand is treated 
J as a comment 
• 


1 

1 

1 
i 



The EJECT statement itself does not 
appear in the source listing. 



SPACE — SPACE LISTING 

The SPACE instruction is used to insert one 
or more blank lines in the listing. The 
format of the SPACE instruction statement 
is ds follows: 



i 1 1 1 

|Name |Operation |Operand | 

I : 1 H 1 

|Blank | SPACE | A decimal value | 
| | |or blank | 
i i 1 1 



A decimal value is used to specify the 
number of blank lines to be inserted in the 
assembly listing. A blank operand causes 
one blank line to be inserted. If this 
value exceeds the number of lines remaining 
on the listing page, the statement will 
have the same effect as an EJECT statement 
The SPACE statement itself does not appear 
in the source listing. 



PRINT — PRINT OPTIONAL DATA 

The PRINT instruction is used to control 
printing of the assembly listing. The 
format of the PRINT instruction statement 
is: 
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1 ■■ 

|Name 
• 


- T 

(Operation 

1 


|Operand | 
■ ■ 


1 — 

| Blank 
i.. 


H 

| PRINT 

.... L._ . ._ 


— 1 — 1 

|One to three operands| 

A 1 


One 


to three of 


the following operands 



are used : 

ON - A listing is printed. 

OFF - No listing is printed. 

GEN - All statements generated by 

macro-instructions are printed. 

NO GEN - Statements generated by 

macro-instructions are not 
printed. However, the 
macro-instruction itself and 
messages resulting from the 
MNOTE instruction, if used, will 
appear in the listing. 

DATA - Constants are printed out in 
full in the listing. 

NODATA - Only the first eight bytes (16 

hexadecimal digits) or the first 
constant, whichever is shorter, 
of the assembled data, is 
printed on the listing. 

A program may contain any number of 
PRINT statements. A PRINT statement 
controls the printing of the assembly 
listing until another PRINT statement is 
encountered. 

Until the first PRINT statement (if any) 
is encountered, the following is assumed: 



1 ■'■ '1 ■■' - 
|Name | Operation 


i ■ ' " ■" 
| Operand 


— i 
1 

H 


I f- 

j | PRINT 
i i 


-+ 

j ON, NODATA, GEN 
■ 


1 
i 


For example, if 


the statement: 




r — i — - 

|Name | Operation 


T " ~ 

| Operand 


— i 
1 

—\ 


1 1- 

1 ice 

i i 


-+ 

|XT,256'00' 
i 


1 
i 


appears in a program, 256 bytes of zeros 
are assembled. If the statement: 


i i 

|Name | Operation 


i 

| Operand 


i 
1 

— 1 


J 1- 

| | PRINT 


-+ 

| DATA 

.1 . . 


1 



is the last PRINT statement to appear 
before the DC statement, all 256 bytes of 



zeros are printed in the assembly listing. 
However, if: 



i 1 1 1 

| Name 1 Operation | Operand | 

I 1 + 1 

| | PRINT | NODATA | 
i i J 1 



is the last PRINT statement to appear 
before the DC statement, only eight bytes 
of zeros are printed in the assembly 
listing. 



PROGRAM CONTROL INSTRUCTIONS 

The program control instructions are used 
to specify the end of an assembly, to set 
the Location Counter to a value or word 
boundary, to specify the placement of 
literals in storage, to check the seguence 
of input cards, to indicate statement 
format, and to punch a card. Except for 
the LTORG and CNOP instructions, none of 
these assembler instructions generate 
instructions or constants in the object 
program. 

If program control instructions are used 
within a DSECT, they are treated as 
comments and not executed. For example, if 
the XFR instruction is used within a DSECT, 
it does not cause any transfer card to be 
generated. 

If the user plans to write his own macro 
instruction routines, the assembler 
instructions ICTL (input format control) , 
ISEQ (input sequence checking) , and LTORG 
(begin literal pool) may not be used as 
instructions within the macro routine. 



ICTL — INPUT FORMAT CONTROL 

The ICTL instruction allows the programmer 
to alter the normal format of his source 
program statements. The ICTL statement 
must precede all other statements in the 
source program and may be used only once. 
The format of the ICTL instruction 
statement is as follows: 



1 

I Name 


T 

| Operation 
H 


T— — 1 

|Operand | 
_| 1 


1 

| Blank 

1 
i 


| ICTL 
1 

I 


| 1 —3 decimal values of| 
|the form b,e,c, | 



Operand b specifies the begin column of 
the source statement. It must always be 
specified, and must be from 1-40, 
inclusive. Operand e specifies the end 
column of the source statement. The end 
column, when specified, must be from 41-79, 
inclusive; when not specified, it is 
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assumed to be 71. The column after the end 
column is used to indicate whether the next 
card is a continuation card. Operand c 
specifies the continue column of the source 
statement. The continue column, when 
specified, must be from 2-40 and must be 
greater than b. If the continue column is 
not specified, the assembler assumes that 
there are no continuation cards and all 
statements must be contained in a single 
card . 

If no ICTL statement is used in the 
source program, the assembler assumes that 
1, 71, and 16 are the begin, end, and 
continue columns, respectively. 

The ICTL card itself is processed under 
normal format and any non— blank character 
punched into column 72 indicates the 
presence of continuation cards. Therefore, 
column 72 should be left blank because 
continuation cards are not reguired for the 
ICTL card. If column 72 contains any 
non-blank character, the card following the 
ICTL card is treated as a continuation card 
and reading begins in column 16, causing 
columns 1-15, inclusively, to be ignored. 

The next example designates the begin 
column as column 25. Since the end column 
is not specified, it is assumed to be 
column 71. No continuation cards are 
recognized because the continue column is 
not specified. 



r — r " ■ 

| Name | Operation 

J h 


■"i 

| Operand 
-+ 


- i 

1 

1 


j | ICTL 


|25 
i 


1 
i 



ISEQ — INPUT SEQUENCE CHECKING 

The ISEQ instruction is used to ch<eck the 
seguence of input cards. The format of the 
ISEQ instruction statement is as follows: 



1 — T — 

|Name | Operation 


"T ~ ~ 1 

|0perand | 


I 1 

|Blank| ISEQ 


H 1 

|Two decimal values of | 


1 1 

t i . ._ 


|the form l,r; or blank | 
i i 



The operands 1 and r, respectively, 
specify the leftmost and rightmost columns 
of the field in the input cards to be 
checked. Operand r must be egual to or 
greater than operand 1. Operand 1 must be 
greater than the end column plus one. The 
field specified by operands 1 and r must 
not be greater than seven bytes. 

Sequence checking begins with the first 
card following the ISEQ statement. 



Comparison of adjacent cards makes use of 
the eight-bit internal collating sequence 

An ISEQ statement with a blank operand 
terminates the operation. Checking may be 
resumed with another ISEQ statement 

Seguence checking is only performed on 
statements contained in the source program. 
Statements generated by a macro are not 
checked for seguence. 



REPRO — REPRODUCE FOLLOWING CARD 

The basic operating system Linkage Editor 
reguires Phase Definition (PHASE) and 
Include Module (INCLUDE) cards. The REPRO 
Assembler instruction allows the inclusion 
of such cards into the object program deck 
to eliminate the necessity of manually 
inserting them. 

The REPRO Assembler instruction causes 
the Assembler to punch a duplicate (in 
80-80 format) of the card immediately 
following the REPRO instruction. The 
punched cards resulting from REPRO 
instructions appear at the same point in 
the assembled text as they appeared in the 
source proqram. If any REPRO instructions 
precede the START instruction, or the 
implied start position (if no START 
instruction is used) , the cards punched 
will precede the ESD cards for the 
assembly. 

The format of the REPRO Assembler 
instruction is as follows: 



r - t 

|Name | 


T 

Operation | 


Operand | 


1 1- 

| Blank | 


REPRO | 


Not used; any | 


1 1 




operand is treated | 


1 1 
i i 




as a comment | 



PUNCH — PUNCH A CARD 

The PUNCH assembler instruction may be used 
to perform the same functions as the REPRO 
assembler instruction. The PUNCH assembler 
instruction causes the data in the operand 
to be punched into a card. As many PUNCH 
statements may be used as are necessary. 
The format is: 



| Name | 


■ - 

Operation 


■ ■ ■ 

Operand | 


f— 1- 

1 Blank | 
i .. .i 


1 

PUNCH | 


1 j 

•PUNCH A CARD' | 



Using character representation, the 
operand is written as a string of up to 80 
characters enclosed in single quotation 
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marks. A co 
necessary, 
are ignored, 
blanks, are 
immediately 
quotation ma 
the card to 
program does 
operand of a 
causing it t 



ntinuation card may be used, if 
Any characters in excess of 80 

All characters, including 
valid. The position 
to the right of the left 
rk is regarded as column one of 
be punched. The assembly 
not process the data in the 
PUNCH statement other than 
o be punched in a card. 



The punched cards resulting from PUNCH 
instructions appear at the same point in 
the assembled text as they appeared in the 
source program. If any PUNCH instructions 
precede the START instruction, or the 
implied start position (if no START 
instruction is used) , the cards punched 
will precede the ESD cards for the 
assembly . 

The main facility provided by the PUNCH 
instruction over the REPRQ instruction is 
the capability of the macro generator to 
substitute values for symbolic parameters 
or SET variable symbols in the operand of a 
PUNCH instruction appearing in a macro 
definition. This allows such things as the 
controlled generation of phase names. 



Name JOperation |0perand 



Blank 



ORG 



| A relocatable ex- 
jpression or blank 



Any symbols in the expression must have 
been previously defined. The unpaired 
relocatable symbol must be defined in the 
same control section in which the ORG 
statement appears. 

The Location Counter is set to the value 
of the expression in the operand. If the 
operand is omitted, the Location Counter is 
set to a location that is one byte higher 
than the maximum location assigned for the 
control section up to this point. 

An ORG statement must not be used to 
specify a location below the beginning of 
the control section in which it appears. 
For example, the statement: 



Name (Operation | Operand 



ORG 



+ 

|*-500 



XFR — GENERATE A TRANSFER CARD 

A transfer card is used by the basic 
operating system Linkage Editor program to 
define the transfer point or entry point of 
a phase, or overlay. The XFR Assembler 
instruction is provided to cause the 
generation of a transfer card in the. 
assembled text in the same location that 
the XFR instruction appeared in the source 
program. 



The format of the 
follows: 


XFR instruction is as 


• i 

|Name | 

1 h- 


M 

Operation | 


_ — -! 

Operand | 
1 


| Blank | 
i. i 


+ 

XFR | 
_ _ - _.j 


A relocatable symbol | 
. . , . j 



The symbol in the operand field must 
appear within the assembly or be previously 
defined as either an entry or external 
symbol. 



ORG — SET LOCATION COUNTER 

The ORG instruction is used to alter the 
setting of the Location Counter for the 
current control section. The format of the 
ORG instruction statement is: 



is invalid if it appears less than 500 
bytes from the beginning of the current 
control section. 

If it is desired to reset the Location 
Counter to a value that is one byte beyond 
the highest location yet assigned (in the 
control section) , the following statement 
would be used: 



1 t 

Name {Operation | Operand 
1 H 



ORG 



I 



If previous ORG statements have reduced 
the Location Counter for the purpose of 
redefining a portion of the current control 
section, an ORG statement with an omitted 
operand can then be used to terminate the 
effects of such statements and restore the 
Location Counter to its highest setting. 



LTORG — BEGIN LITERAL POOL 

The LTORG instruction cause 
thus far encountered in the 
up to the LTORG statement ( 
beginning of the program or 
LTORG statement) to be asse 
appropriate boundaries star 
first double-word boundary 
LTORG statement. The forma 
instruction statement is: 



s all literals 

source proqram 
either from the 

from a previous 
mbled at 
ting at the 
following the 
t of the LTORG 
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1 

] Name 
j 


"i - ■■■■ — 
| Operation 
-+ 


T 1 

| Operand | 


ISymbol 
jor 

Iblank 


| LTORG 

1 

1 

i 


-+ 1 

| Not used; any | 
| operand is treated | 
|as a comment j 
i , .... i 



The symbol represents the address of the 
first byte of the literal pool. It has a 
lenqth attribute of one. 

Special Address ing C on sideration 

Any literals used after the last LTORG 
statement in a proqram are placed at the 
end of the first control section. If there 
are no LTORG statements in a program, all 
literals used in the program are placed at 
the end of the first control section. In 
these circumstances the programmer must 
ensure that the first control section is 
always addressable. This means that the 
base address register for the first control 
section should not be changed through usage 
in subseguent control sections. If the 
programmer does not wish to reserve a 
register for this purpose he may place a 
LTORG statement at the end of each control 
section thereby ensuring that all literals 
appearing in that section are addressable. 



CNOP — CONDITIONAL NO OPERATION 

The CNOP instruction allows the programmer 
to align an instruction at a specific word 
boundary. If any bytes must be skipped in 
order to align the instruction properly, 
the assembler insures an unbroken 
instruction flow by generating no-operation 
instructions. This facility is useful in 
creating calling seguences consisting cf a 
linkage to a subroutine followed by 
parameters such as channel ccmmand words 
(CCW) . 

The CNOP instruction insures the 
alignment of the Location Counter setting 
to a half-word, word, or double-word 
boundary. If the Location Counter is 
already properly aligned, the CNOP 
instruction has no effect. If the 
specified alignment requires the Location 
Counter to be incremented, one to three 
no-operation instructions are generated, 
each of which uses two bytes. 

The format of the CNOP instruction 
statement is as follows: 



1 — 

| Name 
1 


T 

| Operation 


T — 1 

|Operand | 


IBlank 

1 
i 


-H 

|CNOP 

1 
• 


h ^ 

|Two decimal terms | 
|of the form b,w j 
• ■ 



Operand b specifies at which byte in a 
word or double word the Location Counter is 
to be set; b can be 0, 2, 4, or 6. Operand 
w specifies whether byte b is in a word 
(w=4) or double word (w=8) . The following 
pairs of b and w are valid: 



b, w 


specifies 


0,4 


Beginning of a word 


2,4 


Middle of a word 


0,8 


Beginning of a double word 


2,8 


Second half word of a double word 


4,8 


Middle (third half word) of a 




double word 


6,8 


Fourth half word of a double word 



Figure 5 shows the position in a double 
word that each of these pairs specifies. 
Note that both 0,4 and 2,4 specify two 
locations in a double word. 



Double Word 


Word 


Word 


Half Word Half Word 


Half Word Half Word 


1 j 

Byte I Byte i Byte | Byte 
III 


1 1 

Byte i Byte | Byte | Byte 
1 i i 


^ >^ >^ ^ 
0,4 2,4 0,4 2,4 
0,8 2,8 4,8 6,8 



Fiqure 5. CNOP Aliqnment 



Assume that the Location Counter is 
currently aliqned at a double-word 
boundary Then the CNOP instruction in this 
sequence: 



r — t 

|Name | Operation 


i 

| Operand 


- m \ 
1 

j 


, 1 

| | CNOP 
| IBALR 
t. .. . , i 


-+ 

10,8 
12, 14 

. X. 


1 

1 
i 


has no effect; it 
assembly listinq. 


is merely 
However, 


printed in the 
this sequence: 


r t 

|Name | Operation 


| Operand 


1 

^ 


1 1 

| |CNOP 
| IBALR 
i .... i. . 


~f 

I 6,8 
12,14 

i ,. 


i 
i 



causes three branch-on-conditions 
(no-operations) to be qenerated, thus 
aliqninq the BALR instruction at the last 
half-word in a double word as follows: 
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1 1 1 

Name | Operation | Operand | 

1. h- — I 

| BCR |0,0 | 
| BCR | 0 r 0 | 
| BCR | 0,0 | 
| BALR 12,14 | 
i t i 



After the BALR instruction is generated, 
the Location Counter is at a double-word 
boundary, thereby insuring an unbroken 
instruction flov. 



END — END ASSEMBLY 

The END instruction terminates the assembly 
of a program. It may also designate a 
point in the program or in a separately 
assembled program to which control may be 
transferred after the program is loaded. 
The END instruction must always be the last 
statement in the source program. 

The format of the END instruction 
statement is as follows: 



| Name 


T 

|Operation 


|Operand | 


| Blank 


-+ 

| END 

1 


— 1 : 1 

|A relocatable ex- | 
Ipression or blank | 

. i ., .,.,,_,,.„ . , , .i 



The operand specifies the point to which 
control is transferred when loading is 
complete. This point is usually the first 
machine-instruction in the program, as 
shown in the following seguence 



1 — 

| Name 


T ~ 

| Operation 
— 1 


— l 

|Operand 
H 


-■" ~i 


h- 

| NAME 

| AREA 

| BEGIN 

1 

1 

1 

1 

1 
i 


| CSECT 
IDS 
| BALR 
| USING 
1 • 
1 • 
1 • 
| END 
_i 


1 

|50F 

12,0 

l*,2 

1 

1 

1 

IBEGIN 
,i, _. . . 


i 



If the END statement contains a symbolic 
address in the operand field, the Assembler 
automatically inserts the transfer address 
in the END card. 

If the user plans to write his own 
macro-instruction routines, the END 
instruction may not be used as an 
instruction within his macro routines. 

Note : If the operand contains an external 
symbol, only a single-term relocatable 
expression is allowed. 
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MACRO INSTRUCTION- STATEMENTS • 



The assembler provides a macro system to 
reduce the amount of repetitive coding 
required for general routines that must be 
reused a number of times in the same or 
different programs. For example, the 
routines for transferring records from disk 
to main storage , checking for accuracy, 
and deblocking to obtain a single record 
for processing are used for any logical 
input file on disk. Such routines involve 
many instructions that can be written once 
and, with modification of addresses, can be 
used repeatedly in any number of programs. 



The macro system is ccmposed of two 
basic parts: 



MULT &MIER,&MCAND,&PROD 



Prototype in 
Macro Library 



A MULT RATE, HOURS, GROSS 



B MULT COST, PIECES, TOTCOST 



Instructions to 
perform the 
multiplication 
(Model Statements) 



Macro In- 
structions 
in two 
different 
problem 
programs 
( ® and (D ) 



1. Source-program mac ro instructions . 



2. A macro l ibrary of prewritten flexible 
routines (called defin itio ns) . 



A direct relationship exists b 
parts. That is, a single macr 
written in the source program 
in the assembled object progra 
routine taken from the macro 1 
macro library routine consists 
predetermined series of many i 
Thus, the system derives its n 
definition of macro is "of or 
large 'quantities." For one in 
many instructions are assemble 



etween these 
o instruction 
is replaced, 
m, by the 
ibrary. The 

of a 
nstructions. 
ame. A 
involving 
struction, 
d. 



The proper routine is included in the 
object program by the matching of mnemonic 
operation codes. Therefore, the exact same 
Op code is used in the macro instruction 
and in the identification of the 
corresponding set of instructions in the 
macro library. 

As the macro- library instructions are 
assembled, they are tailored to fit the 
particular problem program. This is dene 
by a substitution process. The first 
instruction of a macro routine (after the 
macro definition header) in the macro 
library is a pr oto ty pe statement. This is 
a pattern that consists of variable 
symbolic operands (called parameters ) for 
which values are substituted when the macro 
routine is used by a specific program. The 
macro instruction that is included in the 
user's program specifies the paramete r 
values (commonly abbreviated to the term 
parameter) that are to be substituted in 
the macro-library routine when it is 
assembled. An example of this is: 



This illustrates the prototype statement of 
a multiplication routine that could be us.ed 
by any program to multiply any two factors 
and store the product in a specified 
location. Program ® might use the macro 
to multiply rate times hours and store the 
result in a field labeled gross . Program 
(D might use the same macro from the macro 
library to multiply cost times pieces to 
obtain total cost . 

Each program specifies in the macro 
instruction the values (parameters) that 
are applicable to its own job (rate or 
cost, hours or pieces, gross or total 
cost) . Then when the macro routine is 
assembled, these parameter values are 
substituted for the parameters in the 
prototype statement. The parameter values 
are also substituted in all the 
instructions that follow the prototype to 
actually perform the multiplication. The 
statements following the prototype are 
known as model statements. For the 
multiplication example, the complete 
routine might be: 

MACRO — Macro Definition Header 

&NAME MULT &MIER, &MCAND , SPROD — Prototype 

Statement 

&NAME L 3,&MCAND 

M 2,&MIER I Model Statements 

ST 3,&PR0D 

MEND - — Macro Definition Trailer 



In both illustrations the & character 
preceding the symbolic name is part of the 
syntax of the macro definition language 
(see the Macro Definition Language 
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publication, as listed on the front cover 
of this manual) . 

IBM provides a number of prewritten 
macro library routines and specifies the 
macro instructions that can be used by the 
programmer to call these routines from the 
library. Other routines can be written by 
the user and stored in the macro library. 
User-written routines must follow the same 
rules as the IBM routines. The macros 
supplied by IBM and discussed in this 
publication are grouped in four categories: 

• Input/output control macros 

• File definition macros 

• Supervisor-communication macros 

• Supervisor-assembly macros. 



MACRO INSTRUCTION FORMAT 

A macro instruction, which is a source 
language statement, is interpreted by the 
assembler. The assembler uses the macro 
definition (macro library routine) to 
replace the single statement with many 
assembler language statements. For correct 
interpretation, the format of the macro 
instruction must correspond to the format 
of the prototype statement in the macro 
definition. Therefore, the format of the 
prototype dictates the form in which the 
macro instruction must be written in the 
problem program. 

The n ame fi eld in the macro instruction 
may contain a symbolic name if the name 
field of the prototype has a parameter. 

The operation f ield in the macro 
instruction must contain exactly the same 
mnemonic operation code as the prototype 
(f ot example, MULT) . This may be any 
alphameric code with a maximum of five 
characters, provided the first character is 
a letter. 

The parameters in the operand f iel d of a 
macro instruction must be written in the 
same format as those in the operand field 
of the prototype. Either of two types of 
formats can be used: 

1. Positional format 

2. Keyword format. 

Each type of parameter has a set of rules 
that must be followed. 

Pos itional Format 

In this format the order and placement of 
the parameter values in the macro 
instruction must correspond exactly with 
the order and placement of the parameters 
in the prototype statement. Each parameter 



except the last must be followed by a 
comma. Thus, in the previous illustration: 

RATE corresponds to MIER 
HOURS corresponds to MCAND 
GROSS corresponds to PROD 

If a parameter is to be omitted in the 
macro instruction, while following 
parameters are included, a comma must be 
inserted to indicate the omission. In this 
way, the proper parameters both before and 
after the omission correspond. However, no 
commas need to be included after the last 
parameter used. 

If the parameters cannot be contained in 
the operand field of one card, up to 49 
continuation cards may be used. The 
continue column of each card (except the 
last) must contain a continuation punch 
(any nonblank character) , as in any 
assembler language card. The maximum 
length of a parameter is the same as for an 
assembler symbol- — eight characters. When 
one or more continuation cards are used, 
parameters must fill each card to the 
continuation column with no intervening 
blanks. (A blank indicates that the card 
contains no more parameters.) 



Keyword Forma t 

This format provides a direct mnemonic 
association between the macro instruction 
and the prototype statement. The exact 
parameters used in the prototype are 
specified (without the & ) in the macro 
instruction, where they are eguated to the 
value for this job. . Thus, they have the 
form of: keyword followed by an egual sign 
followed by the value to be substituted in 
the assembled routine. For example: 

MIER=RATE, MCAND=HOURS, PROD=GROSS 

Because the association of parameters is 
performed through the use of the keywords, 
the parameters in the macro instruction may 
appear in any order, and any that are not 
needed may be omitted. This association is 
not dependent upon the order in which they 
are written. The term to the right of the 
egual sign must not exceed eight 
characters. 

Different keyword parameters may be 
punched in the same card, each followed by 
a comma, like the positional type. Or, 
they may be punched in separate cards. 
(When continuation cards are used for a 
keyword format macro, the parameters need 
not fill the operand field to the 
continuation column.) 

MIER=RATE, 
PROD=GROSS, 
MCAND=HOURS 
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Figure 6. Schematic of Macro Processing 



When, separate cards are used for a set of 
parameter specifications each card except 
the last must be punched with a comma 
immediately following the parameter and a 
continuation punch in column 72. Comments 
may be punched in any card if at least one 
space is left after the comma, or, in the 
last card, after the parameter. 



Opening and closing files 
Transferring records 
Blocking and deblocking records 
Checking and writing disk or tape label 
Error checking. 



ASSEMBLY OF THE MACRO 

At program assembly time, the macro 
instruction specifies which routine is to 
be called from the macro library. The 
routine is extracted, tailored by the 
parameters in the macro instruction, and 
inserted in the program (Figure 6) . The 
complete program now consists of both 
source-program statements and tailored 
model statements from the macro library in 
assembler language. In subseguent phases 
of the assembly, the entire program is 
processed to produce the machine-language 
object program. 



INPUT/OUTPUT CON TROL MACROS 

A number of macro routines are provided by 
IBM for the input/output control (IOCS) of 
records from various I/O units. These 
routines control such functions as: 



IOCS handles files of records in the 
following I/O units: 

IBM 1442 Card Read-Punch 

IBM 2501 Card Reader 

IBM 2520 Card Read-Punch or 2520 Card 
Punch 

IBM 2540 Card Read-Punch 
IBM 1403 Printer 

IBM 1404 Printer (continuous forms 
only) 

IBM 1443 Printer 

IBM 1445 Printer 

IBM 2311 Disk Storage Drive 

IBM 2401, 2402, 2403, 2404 Magnetic 
Tape Units (If 
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variable-length records are 
written on 7-track tape, the 
Data Conversion special 
feature is required.) 

IBM 1052 Printer-Keyboard (One 1052 is 
supported, for operator 
communication only. It is 
attached to the multiplexor 
channel. ) 

IBM 2671 Paper Tape Reader 

IBM 1285, 1287 Optical Readers 



STR 



(Synchronous Transmitter R 
Devices connected by lease 
lines through an IBM Synch 
Adapter - Type I, on an IB 
Adapter Unit. , The followi 
are supported: 
a. 1009 Data Transmission 
1013 Card Transmission 
1974 II Data Transmiss 
1978 Print, Read, Punc 
System/360, Model 30, 
75 with a 2701 Data Ad 
attached . 

System/360, Model 20 w 
Communications Adapter 
7701, 7702 Magnetic Ta 
Transmission Terminal 
7711 Data Communicatio 



b. 
c. 
d. 
e. 



f . 



BSC 



h. 



(Binary Synchronous Co 
2701 Data Adapter Unit 
IBM Synchronous Data A 
connected by leased or 
remote IBM System/360, 
50, 65, 67 (working in 
The remote CPU is egui 
2701 Data Adapter Unit 
or an IBM 2703 Transmi 
Unit with Binary Synch 



eceiver) 
d or dial 
ronous Data 
M 2701 Data 
ng devices 

Unit 

Terminal 
ion Terminal 
h Terminal 
40, 50, 65 or 
apter Unit 

ith a 

pe 

n Unit. 



mmunication) IBM 
eguipped with an 

dapter — Type II, 
dial line to a 
Model '30, 40, 
65 mode) , or 75. 

pped with an IBM 
with an S DA II 

ssion Control 

ronous features. 



Note: When BSC support routines are used, 
a minimum of 16K of main storage is 
required . 

IOCS supports any channel configuration 
up to one multiplexor channel and two 
selector channels. 

Both IBM-supplied system programs and 
user problem programs can use magnetic 
tape. However, the main storage required 
for physical and logical IOCS for both tape 
and disk will probably make this unfeasible 
in systems with less than 16K bytes of main 
storage. For example, IBM-supplied system 
programs assume that the system Supervisor 
(including physical but not logical IOCS) 
will occupy a maximum of 4096 bytes of main 
storage, leaving 4096 bytes (in an 8K 
system) available for the execution of the 
system programs. If, however, the user's 
installation includes many different types 
of I/O units and features, the system 



Supervisor may be assembled to 
routines for a combination of 
in total, reguire more than 40 
Similarly, the number and size 
routines included in the Super 
the number of main storage pos 
available for a user's problem 
For detailed information about 
and logical IOCS main-storage 
see the Programmer,' s Gu ide, as 
the front cover of this public 



include 
units that, 
96 bytes. 

of the 
visor affect 
itions 

program. 

Supervisor 
reguirements, 

listed on 
ation. 



When the user's program is executed, the 
portion of the problem program that 
communicates with IOCS and with the 
Supervisor must be located in the first 64K 
of main storage . This includes channel 
command words (CCW) , command control blocks 
(CCB) , file definitions (DTF) , and program 
check, interval timer, and 
operator-communication routines. 
Furthermore, whenever the problem program 
is executed in a disk-resident system, the 
last two routines (interval-timer, and 
operator communication) , if used, must not 
be located in the first 2500 main storage 
positions above the end of the Supervisor. 

Physical IOCS vs - Log ica l IOCS 

The input/output control is considered to 
consist of two parts: physical IOCS and 
logical IOCS. Physical IO CS controls the 
actual transfer of records between the 
external medium and main storage . That 
is, it performs the functions of issuing 
channel commands and handling associated 
I/O interruptions. Physical IOCS consists 
of the following routines: 

Start I/O. routine 
Interruption routine 
Channel scheduler 
Device error routines. 

These physical IOCS routines are part of 
the Supervisor, which is permanently 
located in lower main storage while problem 
programs are being executed. 

I ogical IOCS controls those functions 
that a user would have to perform to locate 
a logical record for processing. A logical 
record is one unit of information in a file 
of like units; for example, one employee's 
record in a master payroll file, one 
part-number record in an inventory file, 
etc. One or many logical records may be 
included within one physical record, such 
as a physical disk or tape record (from gap 
to gap). The term l ogical IOCS refers to 
routines that perform the following 
functions: 

• Blocking and deblocking records 

• Switching between I/O areas when two 
areas are specified for a file 
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• Handling end-of-file and end-of-volume 
conditions 

• Checking/writing labels. 

The logical IOCS routines reguired for 
the execution of a problem program are 
assembled with that program. The 
particular routines reguired are determined 
from the definitions of the logical files 
used by the program. 

Logical IOCS uses physical IOCS to 
execute I/O commands whenever it determines 
that a transfer of data is reguired. For 
example, if a file consists of blocked 
records and a block has been read into main 
storage (Figure 7) , logical IOCS merely 
makes each record in succession available 
to the user, until the end of the block is 
reached. No physical IOCS is reguired. 
When logical IOCS determines that the last 
record in the block has been processed, 
however, it reguests physical IOCS to start 
an I/O operation to transfer the next 
physical record (gap to gap) into main 
storage. In the illustration, only logical 
IOCS (LIO) is reguired to make records 2 
and 3 (and 5 and 6) available; 
however, physical IOCS (PIO) is also 
reguired to make record 4 available 
(records 4 through 6 are transferred in one 
block) . 



Block of 3 Records in Main Storage 



Record 1 
(Record 4) 


Record 2 
(Record 5) 


Record 3 
(Record 6) 









LIO LIO LIO and PIO 

for for for 

Record 2 (5) Record 3 (6) Record 4 

UO = Logical IOCS 
PIO = Physical IOCS 

Figure 7. Physical IOCS vs Logical IOCS 

Both logical IOCS macros (such as GET, 
PUT, READ, WRITE, etc) and physical IOCS 
macros (such as EXCP and WAIT) are 
available to the programmer for handling 
records. The logical IOCS macro routines 
cause all the functions cf both logical and 
physical IOCS to be performed for the 
programmer. When he issues an imperative 
GET instruction for a record, for example, 
that record is transferred to main storage 
, if necessary, and it is available for the 
execution of the next program instruction. 

The physical IOCS routines completely 
bypass the logical IOCS functions (for 
example, blocking and deblocking). They 
permit the problem program to utilize 
physical IOCS functions directly. To 
transfer a physical record (such as a disk 



or tape record) , for example, the problem 
program issues an EXCP macro instruction 
(execute channel program) . This causes a 
reguest for data transfer to be placed in 
the channel scheduler, and program 
execution immediately continues with the 
next problem-program instruction. However, 
the disk or tape record will not be 
available in main storage until some later 
time. Therefore when the record is needed 
for processing, the program must test to 
find out if the transfer has been 
completed. This is accomplished by issuing 
the WAIT macro instruction. 

The functions of physical and logical 
IOCS routines are shown schematically in 
Figure 8. 

Typ es of Processin g 

The logical IOCS routines, process records 
in consecutive order, in random order by 
the Direct Access Method (DAM) , or randomly 
and seguentially by the Indexed Seguential 
File Management System (ISFMS) . 
Consecutive processing applies to all files 
in serial-type I/O devices (such as card 
reader, tape, printer, etc), and to records 
on 2311 disk when they are processed in a 
serial-type order. The DAM and ISFMS types 
of processing apply only to files of disk 
records. Other logical IOCS routines allow 
processing with STR (Synchronous 
Transmitter Receiver) devices, or allow 
CPU-to-CPU Binary Synchronous 
Communication. 

Consecutive Processing: Consecutive 
processing is used to read/write and 
process successive records in a logical 
file. For example, card records are 
processed in the order the cards are fed; 
tape records are processed starting with 
the first record after a header label and 
continuing through the records to the 
trailer label; disk records are processed 
starting with a beginning disk address and 
continuing in order through the records on 
successive tracks (and possibly cylinders) 
to the ending address. 

A consecutive file on disk is contained 
within one or more sets of limits, which 
are specified by Job Control XTENT cards. 
If the logical file consists of more than 
one set of limits, IOCS will automatically 
process each set as needed by the user. 
The records within each set must be 
adjacent and contained within one volume 
(disk pack). However, the sets need not be 
adjacent, and they may be on one or more 
volumes. A file written on disk by the 
direct access method can also be processed 
consecutively, if desired. 

The basic macros used for consecutive 
processing are GET and PUT. These 
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- OR - 
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and WAIT 
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Program 




Set Up CCW and Issue EXCP- 



Next Instruction 
(after EXCP) 



Issue WAIT 

Next Instruction 
(after WAIT) 





Determine Channel* 
Place Request in Queue 
if Channel Busy, and Return 
to Logical IOCS. 
If Channel Not Busy, ^ 
Issue START I/O ' 
and Return to Logical IOCS. 



I/O Starts 



When I/O Complete go V_ |/Q ^ 
through Interrupt Routine J r 



Determine Channel. 
Place Request in Queue 
if Channel Busy, and Return 
to Problem Program. 

If Channel Not Busy, \ . , 

Issue START I/O > ^'/° Starts 

and Return to Problem Program . 

f When I/O Complete, go V- /rk r , fc 
\ through Interrupt Routine J^vO Complete 



Figure 8. Schematic Example of Retrieving a Record Using Logical IOCS (One I/O Area) 
or Physical IOCS 



instructions overlap data transfer and 
processing as much as possible. The extent 
of overlap depends on the user's I/O area 
assignment. In any case when a GET or PUT 
has been executed, the transfer of data is 
complete before the instruction following 
the GET or PUT is executed. 

Direct Access M ethod (DAM) ; The direct 
access method is used to process disk 
records in a random order. Records stored 
at any location within the logical file can 
be processed at any time in the program. 
IOCS locates a disk record for processing 
by referring to record-location references 
supplied by the problem program. The 
location reference consists of two 
parts: a track reference and a record 
reference. The t rac k reference specifies 
the particular track, or the first of 
multiple tracks, to be searched for a 
specified record. The record reference may 
be the record key, if records contain key 
areas, or the record ID (identifier) , which 
is available in the count area of each disk 
record. IOCS seeks the specified track and 
searches for the specified record cn that 



track, or on that track and on succeeding 
tracks in the cylinder. Because reference 
to the records is in random order, all 
packs of a multipack file must be on-line 
for any functions performed by the Direct 
Access Method. 

The basic macros used for the direct 
access method of processing are READ and 
WRITE . Variations within these macros 
permit records to be read, written, 
updated, replaced, or added to a file. 
Thus, this method provides a means of 
creating and maintaining a logical file in 
a random order. When a READ or WRITE 
instruction is executed, the actual I/O 
operation is either started or placed in a 
queue for later execution. Therefore, when 
another problem program instruction 
requires that the transfer of data be 
complete, a test must be made. A WAITF 
macro is provided for this. 

Inde xed Sequential File Ma nagement System 
(ISFMS) ,: The indexed sequential file 
management system is used to process disk 
records either in random order or in 
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sequential order by control information. 
Both orders utilize the control information 
of the records (such as employee number, 
part number, customer number, etc.) , which 
must be available in the key area of each 
disk record. Random processing means that 
any record stored at any location in the 
logical file can be processed at any time 
in the problem program. The user merely 
supplies IOCS with the key (control 
information) of the desired record. IOCS 
searches for the record and makes it 
available for processing. 

In sequential processing, IOCS makes a 
series of records available, one after the 
other, in order by the control information 
(key) in the records. The user specifies 
which record he wants first . Then IOCS 
retrieves the succeeding records (on 
demand) from the logical file, in key 
order, until the problem program specifies 
that the operation is to be terminated. 

ISFMS provides the means of creating an 
organized file (loading) and then adding 
to, reading from, and updating records in 
that file. The file is organized 
originally from records that have been 
pre- sorted by their control information. 
As the records are loaded onto the disk 
pack, IOCS constructs indices for the 
logical file. These indices will permit 
individual records to be found guickly and 
easily in subsequent processing operations. 
The indices are created in such a way that 
specific records can be retrieved randomly, 
or all records can be retrieved 
sequentially. One method can be performed 
as readily as the other. If records are 
added to the file at some later time, IOCS 
updates the indices to reflect the new 
records. 

The basic macros used for the indexed 
sequential system of processinq are 
READ/WRITE and GET/PUT. READ and WRITE are 
used for random operations, and GET and PUT 
are used for sequential operations. When a 
READ, WRITE, GET, or PUT instruction for a 
record is executed, the operation is 
complete before the next instruction in the 
problem program is executed. 

Pr o cessing with Synchronous Transmitter 
Receiver (STR) Device s: Logical IOCS 
provides macro routines for the 
transmission of data to, and the reception 
of data from, an STR device. All STR 
devices use identical data transmission 
codes and line control procedures. 

Logical IOCS provides READ/WRITE level 
macro instructions to simplify the use of 
STR devices by the problem program. 
Another macro instruction, CNTRL, provides 
STR line control. The CDCNV (code 
conversion) macro provides for the 



conversion of the standard STR transmission 
code (fixed count f our-out-of-eight [4/8]) 
to or from EBCDIC (used internally in the 
System/360) . 

Where the STR devices are attached over 
a dial network, logical IOCS provides the 
macro instruction DIALO to aid in 
establishing the connection. 

Binary Synchronous Communication (BSC) 

Logical IOCS provides macro support 
routines for sending and receiving data in 
a CPU-to-CPU communications environment. 
Both CPU's use identical line control 
procedures. 

Logical IOCS provides READ/WRITE level 
macro instructions, which simplify the 
process of sending data to or receiving 
data from a remote System/360 by the 
problem program. The CNTRL macro 
instruction provides the facility for 
handling basic BSC line control functions. 

Where the CPU'S' are connected by a dial 
line, logical IOCS provides the TDIAL macro 
instruction to handle establishing the 
connection and to provide the optional 
facility for ID-verification. 

Macro Instructions 

Generally two types of macros are reguired 
for processing the records in a logical 
file: one declarative file-definition 
macro, and one or more imperative macros. 

The f ilerdef inition macro describes the 
logical file, indicates the type of 
processing to be used for the file, and 
specified main-storage areas for the file. 
Six file-definition macros are provided for 
defining files processed by logical IOCS 
(DTFSR, DTFDA, DTFIS, DTFSN, DTFBS, and 
DTFRF) , and one for disk or tape files 
processed by physical IOCS (DTFPH) . Which 
of these applies to a particular file is 
determined by the type of processing used 
for the file (see T ypes of Processing ) . 
The macros and their use are: 

DTFSR Define The File in SeRial-t.ype 
device. This macro is used in 
conjunction with consecutive 
processing of records in any I/O 
device. 

DTFDA Define The File for the Direct 

Access method of processing. This 
macro is used whenever disk 
records are to be processed in a 
random order by the direct access 
method. 

DTFIS Define The File for the Indexed 
Sequential system of processing. 
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This macro is used whenever a file 
is organized by the indexed 
sequential file management system 
and is to be processed by that 
system. 

DTFSN Define The File for Synchronous 
Transmitter-Receiver use. This 
macro is used for processing in a 
Tele-processing environment with 
STR devices. 

DTFRF Define The File for ReFerence. 

This macro is used with the DTFSN 
macro and the DTFBS macro to 
permit the problem program to 
reference the information in the 
channel command block (CCB) . 

DTFBS Define The File for Binary 

Synchronous Communication use. 
This macro is used for processing 
in a CPU-to-CPU communications 
environment. 

DTFPH Define The File for processing by 
PHysical IOCS. This macro is used 
only if a disk or tape file with 
standard labels is to be processed 
by physical IOCS. No other files 
processed by physical IOCS reguire 
definition. 

Each file definition macro reguires a 
set of keyword parameter entry cards 
(Figure 9) to define the file. At assembly 
time these cards must precede the problem 
program. The details of these entries are 
described in the section entitled Fil e 
De fi nitio n Macro s. The definition of a 
file is utilized when an imperative macro 
instruction (such as GET, PUT, READ, WRITE, 
etc.) is issued in a problem program 
statement. If a GET is issued, for 
example, the file definition supplies such 
factors as: 

• Record type and length 

• Input device from which the record is 
to be retrieved 

• Main-storage area where the record is 
to be located for processing by the 
problem program. 

File definition macros and imperative 
macros that refer to the file definitions 
must be assembled together. That is, all 
file definitions must be assembled with the 



user's problem program. Imperative macros 
executed by the Indexed Seguent'ial File 
Management System (ISFMS) make use of 
literals, and the literal pool must be 
addressable any time these macros are 
executed. Thus the pool must be available 
in each phase. Furthermore, it must be 
available in each control section (CSECT) 
within a phase if base registers are 
changed between control sections. 
Therefore, a LTORG statement should be 
included at the end of each control section 
whenever disk records are to be processed 
by ISFMS. If a user defines only one 
control section, he must include a LTORG 
statement to ensure the placement of 
literals at the end of his control section, 
because multiple control sections are also 
generated by ISFMS. 



Imperative macr o instructions are 
included in the problem program. They 
perform such functions as opening a file, 
making records available for processing, 
writing records that have been processed, 
etc. The macro instructions provided by 
IBM for input/output control (Figure 10) 
are presented in this section in the 
following groups. 

Initialization: OPEN and LBRET 

Processing Records Consecutively: GET, 
PUT, RELSE, TRUNC, READ, WAITF, RDLNE, 
DSPLY, RESCN, CNTRL, CHNG, and PRTOV 

Processing Disk Records by the Direct 
Access Method: READ, WRITE, WAITF, 
and CNTRL 

Processing Disk Records by the Indexed 
Seguential System: SETFL, ENDFL, 
WRITE, READ, SETL, ESETL, GET, and PUT 

Processing with STR Devices: SOPEN, 
DIALO, READ, WRITE, CNTRL, CDCNV, 
SCLOS. 

Processing Records by Physical 

IOCS: CCB, EXCP, WAIT, WAITM, and 
CHNG 

Binary Synchronous 

Communication: BOPEN, IDIAL, READ, 
WRITE, CNTRL, BCLOS, and ERRPT. 

Writing Checkpoint Records: CHKPT 

Completion: CLOSE, LBRET, and FEOV. 
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Figure 9. Sample DTFSE and DTFIS Macro Instruction 
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TYPE OF PROCESSING WITH LOGICAL IOCS 






Consecutive 




Indexed Sequential 
System 








MACRO INSTRUCTION 


231 1 Disk Drive 


2400 Magnetic Tape Unit 


1442/2501/2520/ 
2540 Reader 


1442/2520/2540 Punch 


1403/1404/1443/ 
1445 Printer 


1052 Printer- 
Keyboard 


2671 Paper 
Tape Reader 


1285 Optical Reader 


1287 Optical Reader , 


Direct Access Method 


Load File 


Add Records 


Random Retrieve 


Sequential Retrieve 


STR Devices 


BSC Support 


PHYSICAL IOCS 


In It in 1 1 79 

II 1 1 1 lU 1 1 

OPEN 


x 


x 


x 


x 


x 


x 


x 


x 


x 


A 


A 


A 


Y 
A 


A 






A 


SOPEN 






























Y 
A 






BOPEN 
































X 




DIALO 






























Y 
A 






IDIAL 
































x 




LB RET 2 


x 


x 
















Y 
A 














v 

A 


Process 

Transfer Records 
GET 


x 


x 


X 3 






x 


x 


x 


X 10 










x 








PUT 


X * 


x 


X 5 


x 


x 


x 
















Y 
A 








READ 


















X 1 1 


x 






x 




x 


x 




WRITE 




















X 


X 


X 


X 




X 


X 




RELSE B 


X 


X 
































RDLNE 
















X 


X>o 


















TRUNC 7 


X 


X 
































WAITF 


















X 11 


x 
















EXCP 


































x 


WAIT 






























x 


x 


x 


WAITM 






























x 


x 


x 


CDCNV 






























x 






DSPLY 


















X 11 


















RESCN 


















X 1 1 


















Set Mode 

SETFL 
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Non- Date Operations 
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Complete 
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Notes: 1. Required only for disk or tape files with standard labels. 

2. Applies only if DTFSR, DTFDA, or DTFPH LABADDR is specified. 

3. In the 2540, GET normally reads cards in the read feed. If TYPEFLE=CMBND is specified, GET reads 
cards at the punch - feed- read station. 

4. PUT rewrites an input disk record if UPDATE is specified. 

5. In the 1442, 2520, or 2540, PUT punches an Input card with additional information if TYPEFLE = CMBND 
is specified. 

6. Applies only to blocked input records. 

7. Applies only to blocked output records. 

8. Applies only when two selector channels and one or more 2- channel, simultaneous- read- while- write tape 
control units are installed. 

9. Applies only to output tape files with standard labels. 

10. Applies only to journal tape processing. 

11 . Applies only to document processing. 



Figure 10. Macro Instructions for Input/Output Control 
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INITIALIZATION 

Before the first record can be read from 
any input file or transferred to any output 
file by logical IOCS macro instructions, 
that file must be readied for use by 
issuing an OPEN instruction. This applies 
to logical files in all input/output units 
available in the system: card readers, 
card punches, magnetic tape units, disk 
drives, paper tape reader, printers, 
optical readers, and display units. When 
physical IOCS macro instructions will be 
used for a given file, OPEN is reguired for 
that file only if standard labels on disk 
or magnetic tape are to be checked or 
written. 

Disk L abels 

Whenever files of records are written cn 
disk, each disk pack (volume) must contain 
standard labels to identify the pack and 
the logical files (s) on the pack. When 
logical IOCS is used for a file, the IOCS 
routines read, check, and/or write standard 
disk labels. When physical IOCS is used, 
IOCS processes the labels if the DTFPH 
macro instruction is included in the user's 
program. The entry TYPEFLE must be 
specified to indicate whether the file is 
an input file (read and check labels) or an 
output file (read and check eld labels and 
write new labels) . 

The standard labels include one volume 
label for each pack and one or more file 
labels, for each logical file on the pack. 
The following paragraphs describe briefly 
the organization of labels on disk packs. 
Additional information about disk labels is 
given in the BOS Progra mmer 's Guide . 

Volu me Label s; The standard volume label 
identifies the entire volume (pack) and 
offers volume protection. It is always the 
third record on cylinder 0, track 0. The 
first two records on this track are Initial 
Program Loading (IPL) records. The 
volume-label record consists of a count 
area, a 4-byte key area, and an 80-byte 
data area. Both the key area and the first 
four bytes of the data area contain the 
label identifier VOL1. The remaining 76 
bytes of the data area contain Other 
identifying information such as the volume 
serial number, and the a ddress of the set 
of file labels for the pack (see Standard 
Fil e Labels ) . The volume label is 
generally written once, when the disk pack 
is received, by an IBM-supplied utility 
program. 

The standard volume label may be 
followed by one to seven addition al volume 
lab els (starting with record 4 on cylinder 
0, track 0) . These labels must contain the 
label identifier VOL2, VCL3 etc in the 



four-byte key areas and in the first four 
bytes of the data areas. The other 76 
bytes may contain whatever information the 
user requires. The additional volume 
labels are also written by the utility 
program that writes the standard volume 
label. However, IQCS does not make them 
available to the user for checking or 
rewriting when problem programs are 
executed. These labels are always bypassed 
by the OPEN routines. 



Standard File Label s: The standard file 
labels identify the logical file, give its 
location (s) on the disk pack, and offer 
file protection. The labels for all 
logical files on a pack are grouped 
together and stored in a specific area of 
the pack* 

The number of labels reguired for any 
one logical file is affected by the file 
organization (see Standard File- Label 
Formats ) and by the number of separate 
areas of the pack (extents) used by the 
file. The data records for a logical file 
may be contained within one area of the 
pack, or they may be scattered in different 
areas of the pack. The limits (starting 
and ending addresses) of each area used by 
the file are specified by the standard file 
label (s) . 

Because each file label contains file 
limits, the group of labels on the pack is 
essentially a directory of all data records 
on the pack (volume) . Therefore, it is 
known as the Volume Table of Contents 
(VTOC) . The VTOC itself becomes a file of 
records (one or more standard-label records 
per logical file) and, in turn, has a 
label. The label of the VTOC is the first 
record in the VTOC. This label identifies 
the file as the VTOC file, and gives the 
file limits of the VTOC file. The Volume 
Table of Contents is contained within one 
cylinder of a disk pack. It does not 
overflow onto another cylinder. 

If a logical file of data records is 
recorded on more than one disk pack 
(volume) , standard labels for the file must 
be included in the VTOC of each pack used. 
The label (s) on each pack identifies the 
portion of the logical file on that pack 
and specifies the extent (s) used on that 
pack . 

Standard File Label Format s: All 
standard-file- label records have a count 
area and a 140-byte key/data area. Three 
standard-label formats are provided. 

Format 1. This format is used for all 
logical files, and it has a 44-byte key 
area and a 96-byte data area. It is always 
the first of the series of labels when a 
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file requires more than one label on a disk 
pack (as discussed in Formats 2 and 3) . 

The Format 1 label identifies the 
logical file (by a file name assigned by 
the user and included in the 44-byte key 
area) , and it contains file- and 
data-record specifications. It also 
provides the addresses for three separate 
disk areas (extents) for the file. If the 
file is scattered over more than three 
separate areas on one pack, a Format 3 
label is also required. In this case, the 
Format 1 label points to the second label 
set up for the file on this pack. 

If a logical file is recorded on more 
than one disk pack, the Format 1 label is 
always the first label for the file in the 
VTOC on each pack. 

Format 2. This format is required for 
any file that is organized by the Indexed 
Seguential File Management System. The 
44-byte key area and the 96-byte data area 
contain additional specifications unique to 
this type of file orqanization (such as the 
hiqhest record in the overflow area) . 

If an indexed seguential file is 
recorded on two or more packs, the Format 2 
label is used only on the pack containinq 
the indices. This pack may, or may not, 
contain data records. The Format 2 label 
is not repeated on the additional packs (as 
the Format 1 label is). 

Fo rmat 3. If a logical file uses more 
than three extents on any pack, this format 
is used to specify the addresses of the 
additional extents. It is used only for 
extent information. It has a 44-byte key 
area and a 96-byte data area that provide 
for 13 extents. 

The Format 3 label is pointed to by the 
Format 1 label for the logical file. It is 
included as reguired on the first pack, or 
on additional packs if the loqical file is 
recorded on two or more packs. 



Use r -Standard File L abel 
include labels to define 
if he desires, provided 
processed consecutively 
specified) , by the direc 

(DTFDA macro specified), 
IOCS (DTFPH macro specif 
orqanized and processed 
sequential file manaqeme 
specified) permits stand 
file that is to be proce 
order may have up to eiq 
labels and up to eiqht u 
The trailer labels can b 
indicate an end-of-volum 
is, when the end of an e 

(pack) is reached and th 



s: The user may 

his file further, 
the file is 
(DTFSR macro 
t access method 
or by physical 
ied) . A file 
by the indexed 
nt system (DTFIS 
ard labels only. A 
ssed in consecutive 
ht user-header 
ser-trailer labels, 
e written to 
e condition. That 
xtent on one volume 
e next extent is on 



a different volume, or when the end of the 
file is reached, user-trailer labels can be 
included to contain whatever trailer 
information the user desires (for example, 
a record count for the completed volume) . 



User-standard labels are not stored in 
the Volume Table of Contents. Instead, 
they are written on the first tr ac k of the 



first extent allotted for the 
data records. In this case, t 
data records start with the se 
the extent, regardless of whet 
labels require a full track, 
written on two or more packs, 
are written on each of the pac 



logical-file 

he user's 

cond track in 

her the 

If a file is 

the labels 

ks. 



All labels must be eighty bytes long and 
they must contain standard information in 
the first four bytes. The remaining 76 
bytes may contain whatever information the 
user wants. 



The standard in 
four bytes is used 
reading or writing 
labels are identif 

UHL2, UHL8. The 

applicable, are id 

UTL1, UTL7. Eac 

or trailer) is ter 
record (a record w 
is written by IOCS 
has five header la 
labels, the conten 
track is: 



formation in the first 
as a record key when 
the labels. The header 
ied by UHL1, 

trailer labels, when 
entified by UTLO, 
h user-label set (header 
minated by an end-of-file 
ith data length 0) , which 
For example, if a file 
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R0 
R1 

R2 
R3 

R5 

R6 

R7 

R8 

R9 

R10 

R11 



Stand 
UHL1- 
UHL2- 
UHL3- 
UHL4- 
UHL5- 
UHL6- 
UTL0- 
UTL1- 
UTL2- 
UTL3- 
UTL4- 



ard info 
-user' s 
-user' s 
-user • s 
-user ' s 
-user' s 
-end-of- 
-user' s 
-user' s 
-user' s 
-user' s 
-end-of- 



rmation 

1st header label 
2nd header label 
3rd header label 
4th header label 
5th header label 
file record 
1st trailer label ) 
2nd trailer label I 
3rd trailer label ( 
4th trailer label; 
file record 



DL=80 



— DL=00 



DL=80 



~DL=00 



When files are processed by the direct 
access method, (or processed by physical 
IOCS defined with DTFPH with MOUNTD=ALL) 
only user-standard header labels can be 
written. In this case, the user-label 
track contains: 



R0 
R1 

R2 



R(n) 



Standard information 

UHL1 — user's 1st header label 

UHL2 — user's 2nd header label 



UHL (n) — user's nth header 
label where <8 
R(n+1) UHL (n+ 1) --end-of-file record \ 
R(n+2) UTLO — end->-file record J 



DL=80 



DL=00 
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The user's label routine can determine 
if a label is a header or trailer label by 
testing the first four bytes of the label 
(see OPEN Macro ) . 

Sta n dard Tape Labels 

When a tape input or output file that has 
standard labels is opened, "IOCS can handle 
the label checking (on input) or writing 
(on output) . When logical IOCS macros are 
used in the program, the DTFSR entry 
FILA BL=S TD must be included to specify 
IOCS-processing of labels. When physical 
IOCS macros are used, the DTFPH entry 
TYPEFLE must be included to indicate 
whether this is an input file (check 
labels) or an output file (write labels) . 

If an input tape contains standard 
labels but the user does not want IOCS to 
check them, FILABL=NSTD should be specified 
in the file definition. 

The standard labels for a tape file 
are: a volume label, a file header label, 
and a file trailer label. 

Volu me Label s: The standard volume label , 
which is the first record (eighty 
characters) on a reel of tape, identifies 
the entire volume (reel) and offers volume 
protection. It contains the label 
identifier V0L1 in the first four 
positions, and other identifying 
information such as the volume serial 
number. This is a unigue number generally 
assigned to the reel when it is first 
received in the installation. The volume 
label is generally written once, when the 
reel of tape is received, by an 
IBM-supplied utility program. The standard 
volume label may be followed by a maximum 
of seven additional volume labels if 
desired. These must be identified by V0L2, 
V0L3, etc, in the first four positions of 
each succeeding label. However, IOCS does 
not permit the checking or writing of 
additional volume labels by the user in the 
problem program. These labels are always 
bypassed on input. 

Fil e labels : The volume label set is 
followed by a standard f ile header label . 
This label (eighty characters) identifies 
the logical file recorded on the tape and 
offers file protection. It contains the 
label identifier HDR1 in the first four 
positions, and other identifying 
information such as file identifier, file 
serial number, creation date, etc. An 
input tape may contain standard header 
labels HDR1-HDR8. If so, IOCS checks only 
label HDR1 and bypasses HDR2-HDR8. 

The standard file header label (s) may be 
followed by a maximum of eight user-written 
standard labels if desired. If so, the 



additional file header labels must be 
identified by UHL 1 , UHL2, etc. A tape mark 
follows the last file header label. 

A standard file t railer label is located 
at the end of a logical file (EOF), or at 
the end of a volume (EOV) if a logical file 
is continued on another volume. The 
trailer label has the same format as the 
header label. It is identified by EOF1 or 
E0V1 (instead of HDR1) and contains a 
physical record count (block count) . Tike 
the file header label, the standard file 
trailer label on an input file may be 
followed by seven additional standard 
trailer labels identified by E0V2-E0V8 or 
E0F2-E0F8, whichever is applicable. IOCS 
bypasses these labels. If desired, the 
standard trailer label (s) may be followed 
by a maximum of eight user-written standard 
trailer labels, which must be identified by 
UTL1-UTL8. 

All user-written standard labels must be 
eighty characters long and must contain the 
standard identification in the first four 
positions. The remaining 76 positions may 
contain whatever information the user 
wants. Additional information about tape 
labels is given in the P r ocrrammer ' s Guide , 
listed on the front cover of this manual. 

Nonstandard Tape Label s 

Any tape labels that do not conform to the 
standard-label specifications are 
considered nonstandard and, if desired, 
must be read, checked, or written by the 
user. On input the nonstandard labels may, 
or may not, be followed by a tapemark. 
This choice, combined with the user's 
reguirements to check the labels, or not, 
Results in the following four possible 
conditions that can be encountered: 

1 t Label (s) , followed by a tapemark, are 
to be checked. 

2. Label (s), not followed by a tapemark, 
are to be checked. 

3. Label (s), followed by a tapemark, are 
not to be checked. 

4. Label (s), not followed by a tapemark, 
are not to be checked. 

For conditions 1 and 2, the DTFSR entries 
FILABL=NSTD and LABADDR=Name must be 
specified in the file definition. For 
condition 3, the DTFSR entry FILABL=NSTD 
must be specified. DTFSR LABADDR is 
omitted and IOCS skips all labels, passes 
the tapemark, and positions the tape at the 
first data record to be read. For 
conditi on 4, the DTFSR entries FILABL=NSTD 
and LABADDR = Name must be specified. In 
this case IOCS cannot distinguish labels 
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from data records because there is no 
tapemark to indicate the end of the labels. 
Therefore, the user must read all labels 
even though checking is not desired. This 
positions the tape at the first data 
record. 

For output files created by logical 
IOCS, a tapemark always follows the last 
nonstandard label, unless the user 
specifies the DTFSR entry TPMARK=NO. 

Unl abeled Tape Files 

On input, unlabeled tapes (DTFSR FILABL=NO) 
may or may not contain a tapemark as the 
first record. If the tapemark is present, 
the next record is considered to be the 
first data record. If there is no 
tapemark, IOCS reads the first record, 
determines that it is not a tapemark, and 
backspaces to the beginning of the first 
record which it considers to be the first 
data record. For unlabeled output files 
(DTFSR FILABL=NO) created by logical IOCS, 
the first record is always a tapemark, 
unless the user specifies otherwise. If 
the user does not wish to have a tapemark 
written, he must specify DTFSR TPMARK=NO. 

OPEN Macro 

i 1 1 1 

|Name | Op | Operand | 

I 1 1 J 

| | OPEN | filename | 

| | OPEN | f ilenamel ,f ilename2, | 

i i i i 

The OPEN macro instruction is used to 
activate each file that is to be utilized 
in the problem program. The symbolic name 
of the logical file (assigned in the DTFSR, 
DTFDA, DTFIS, or DTFPH header entry) is 
entered in the operand field of this 
instruction. As many as 16 files may be 
opened by one instruction, by entering 
additional file-name parameters. In this 
case, the files are opened in the same 
order as they are specified in the OPEN 
instruction. 

For the card readers, card punches, 
printers, and paper-tape readers, OPEN 
simply makes the file available for input 
or output'. 

When IIOCS is used for processing 
journal tapes on the 1285 and 1287 Optical 
Reader, the OPEN macro must be issued at 
the beginning of each input roll. 

If certain procedures are followed when 
an end-of-tape condition occurs, it is 
possible to process two or more rolls on 
the 1287 as one file. The method is to 
press the Optical Reader start key 
(creating an intervention reguired 



condition) instead of the end-of-file key 
to run out this tape. The next tape can 
then be loaded and processed as a 
continuation of the previous tape. 
However, since OPEN is not reissued, no 
header information can be entered between 
tapes. 



When LIOCS document processing, OPEN 
must be issued to make the file available. 
OPEN allows header (identifying) 
information to be entered at the 1285 or 
1287 keyboard, if desired., for journal tape 
or cut documents (1287). When header 
information is entered, it is always read 
into I0AREA1, which must be large enough to 
accommodate the desired information. 

OPEN does not clear the eight binary 
counters used in the optical readers. 
These counters are initially zeroed. They 
accumulate error statistics, as listed 
under COREXIT=Name, in the section on DTFSR 
detail entries. 

When a magnetic t ape file with standard 
labels ( STD specified in DTFSR FILABL) is 
opened, IOCS expects the first record read 
to be a label. The first record is a label 
if the tape file being opened is the first 
file on the reel and if IOCS rewinds the 
reel (see DTFSR REWIND) . If, however, 
other specifications are given in DTFSR 
REWIND or if a file starting in the middle 
of the reel is opened, it is the user's 
responsibility to position the tape 
properly so that the first record read is a 
label. If the first record is not a label, 
IOCS indicates an error condition by 
issuing a message to the operator. An 
unlabeled file (DTFSR FILABL=NO) can, 
however, be opened in the middle of data 
records without causing an error condition. 
If a file with nonstandard labels (DTFSR 
FILABL=NSTD) is opened, all label 
processing is the responsibility of the 
user's routines (see 

Initialization: Nons t andard Tape Labels> . 

Whenever an input/output disk or tape 
file is to be opened and the user plans to 
process user-standard labels or nonstandard 
labels, he must provide the information for 
checking or building the labels. If this 
information is obtained from another input 
file, that file must be opened ahead of the 
disk or tape file. This is done by 
specifying the input file ahead of the disk 
or tape file in the same OPEN instruction, 
or by issuing a separate OPEN instruction 
preceding the OPEN for the disk or tape 
file. 

The specific functions that occur on an 
OPEN for a disk or tape file vary with the 
type of operation (input or output) and 
with the use of file labels. These 
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functions are discussed in the following 
sections. 

When building an output file and IOREG 
is specified, OPEN positions IOEEG to the 
beginning of IOAREA1. 

In addition to the registers used by 
logical IOCS, OPEN also uses register 5. 
The programmer may use register 5 because 
the OPEN macro routine saves and restores 
this register. However, if the programmer 
plans to use register 5 as a base register, 
he should be aware that register 5 is 
dropped at the end of the OPEN routine. 

For a discussion of reopening a file 
after it has been closed, see CLOSE Macro . 

For a discussion of SOPEN, to initialize 
the adapter for STR devices, 
see: P rocessing with STR Devices . For a 
discussion of BOPEN, to initialize the data 
adapter for BSC, see: Binary Synchr onous 
Communicatio n . 

Disk Input File 

When an input file that is recorded on disk 
is opened, the OPEN routines: 

• Check the standard label (s) for the 
file. 

• Make any user-standard labels available 
to the user for checking, if the DTFSR, 
DTFDA, or DTFPH entry LABADDR is 
included in the file definition. The 
indexed seguential system (DTFIS) does 
not permit user-standard labels. 

• Locate the area(s) of the disk pack 
(extent) where the file is written. 

• Make the file records available for 
processing. 

For these functions, the OPEN routines 
refer to the information supplied by the 
user in Job Control VOL, XTENT, and DLAB 
cards. A VOL card and a DLAB card must be 
supplied for each logical file, and an 
XTENT card must be supplied for each 
separate area (in each volume) used by the 
file. 

The functions of the OPEN routines may 
occur at different times during the job, 
depending on the type of processing 
specified for the file by the 
file-definition macro instruction. If a 
file is to be processed consecutively 
(DTFSR specified), OPEN initially checks 
the standard label (s) on the pack or on the 
first pack of a multipack file, makes any 
user-standard labels on the first pack 
available for checking, and then locates 
and makes available the fir st extent on the 



first pack. IOCS processes one extent at a 
time, in the seguence specified by the 
user's control cards. When IOCS detects 
the end of the current extent, it branches 
to the end-of-extent routine. OPEN then 
locates the next extent specified by the 
control cards, makes sure it is on-line and 
ready, and makes it available for 
processing. If the next extent is the 
first extent of a different pack used by 
the file, OPEN checks the standard labels 
on that pack ans makes any user labels on 
that pack available to the user for 
checking. If the user has included 
user - trailer labels for a consecutive file, 
they are made available for checking when 
the last extent on one pack is completed 
and before the first extent on the next 
pack is opened (see Com plet ion: - -D isk -Input 
File!* " ----- 



When a file is to be processed by the . 
direct access method (DTFDA specified) or 
by the indexed seguential system (DTFIS 
specified) , all disk areas specified by 
theuser's control cards for the file must 
be mounted and ready when the file is first 
opened. Therefore, the OPEN routines 
initially check all standard labels on all 
packs used by the file, make all- user 
labels (if any) available for checking, and 
check all specified extents and make them . 
available for processing. For a multi-pack 
file, OPEN processes the standard labels 
followed by all user labels on the first 
pack, then processes standard labels on the 
second pack, etc. Therefore, the user's 
label routine is entered for each user 
label on each pack in turn, after the 
standard label on that pack has been 
checked. 

If a file is to be processed by physical 
IOCS (DTFPH specified) and if the DTFPH 
entry MO UNTD= SINGLE is specified, the file 
is treated as consecutive at the initial 
opening. That is, only the pack containing 
the first extent specified by the user's 
control cards must be on-line when the 
initial OPEN is issued. The labels on this 
pack are processed, and the first specified 
extent is made available for processing. 
Thereafter the user must keep track of the 
extents and issue an OPEN for each 
succeeding extent when it is reguired for 
processing. Each additional time that OPEN 
is issued for the file, IOCS locates and 
makes available the next extent specified 
by the user's control cards. If the DTFPH 
entry MOUNTD=ALL is specified, all extents 
specified for the file must be mounted and 
ready when the initial OPEN is issued. All 
labels are checked (or made available for 
user-checking) and all extents are checked 
and made available for processing. Only 
one OPEN is issued for the file, the 
function for MOUNTD=ALL are similar to 
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those performed when a direct access or 
indexed sequential file is opened. 

Checki ng User- Standard Labels ; When a disk 
file contains user-standard labels, the 
programmer can check them in his own 
routine if the DTFSR, DTFDA, or DTFPH entry 
LABADDR is included in the file definition. 
The OPEN routines branch to the user's 
routine after each user's label has been 
read. IOCS reads each label into the label 
read-in area. The address of this area is 
supplied to the user in register 1 upon 
entry into his routine. The user's routine 
can identify the various labels (and 
distinguish between header and trailer 
labels) by testing bytes 1-4 of the read-in 
area. After checking each label, the user 
must return to the OPEN routines by use of 
the LBRET macro. 

Disk Output File 

When an output file that is to be recorded 
on disk is opened, the OPEN routines: 

• Audit the extents specified by control 
cards to make sure that any data 
previously recorded is no longer active 
and may be destroyed. 

• Create and write required standard 
label sets. 

• Permit the user to create user-standard 
labels and write those labels, if the 
DTFSR, DTFDA, or DTFPH entry LABADDR is 
specified. The indexed sequential 
system (DTFIS) does not permit 
user-standard labels. 

• Locate the area (s) of the disk pack 
where the records are to be written. 

• Make the area (s) available to logical 
IOCS . 

Similar to the opening functions for an 
input file, the OPEN routines refer to the 
information supplied by the user in the Job 
Control VOL, XTENT, and DLAB cards for the 
output file. For the creation of the 
standard labels, OPEN also uses information 
supplied by the file-definition macro 
(DTFSR, DTFDA, DTFIS, or DTFPH). 

As each pack is opened for a file, IOCS 
constructs and writes the standard label 
(s) for that pack. For consecutive 
processing (DTFSR specified) only the first 
pack is opened at the initial OPEN. After 
the first, each other pack is opened and 
the standard labels are written when, 
during execution, the processing of records 
for one . pack is completed and the file is 
to be continued on a different pack. For 
the direct access method (DTFDA) or the 
indexed sequential system (DTFIS) , all 



packs are opened and all standard labels 
are written at the initial OPEN for the 
logical file. 

After the standard labels are written 
for any pack, IOCS branches to the user's 
label routine (if one is specified by the 
DTFSR, DTFDA, or DTFPH entry LABADDR) and 
the user can construct his label (s) . 

The extents specified by the user are 
checked in turn. That is, they are checked 
as they are ready to be written when 
processing consecutively. Or, they are 
checked, one after the other, at the 
initial OPEN when the direct access method 
or the indexed, sequential system is used. 
This checking is based on the expiration 
dates in the existing standard file labels. 
If any files are to be partially or wholly 
destroyed, their standard labels are 
removed from the Volume Table of Contents. 
This, in effect, deletes the entire file 
from this pack. 

If an output file is to be processed by 
physical IOCS, both the initial and 
subsequent opening functions are similar to 
those described for an input file (see OPEN 
Macro: Disk Input File) , except that 
labels are written rather than checked. 
Thus, the file is treated like a 
consecutive file if DTFPH MOUNTD=S INGLE is 
specified. It is treated like a direct 
access or indexed sequential file if DTFPH 
MO0NTD=ALL is specified. 

Writing U ser-Standard Header Label s : When 
the user specifies that user-standard 
labels are to be written (by including the 
DTFSR, DTFDA, or DTFPH entry LABADDR) , the 
user constructs the labels and IOCS writes 
them. The OPEN routines branch to the 
user's routine after the standard label (s) 
is written. OPEN prepares for the user's 
label (s) by setting up a label area where 
the user can construct the label (s) , 
supplying the address of the area in 
register 1, placing UHL1 (for the first 
label) in the first four bytes of the area, 
and storing a return address in register 
14. In his routine the user constructs a 
76-byte label and returns to IOCS by use of 
the LBRET macro. IOCS checks for a 
set-completed indication, writes the label, 
determines if eight labels have been 
written and, if not, increases the UHL 
identification by 1 and returns to the 
user's label routine. Because a maximum of 
eight user-standard labels is permitted, 
IOCS automatically terminates the label set 
after a label with UHL8 is written. If the 
user reguires fewer labels, he can force 
the end of the label set by issuing the 
LBRET macro with the operand "1". Whenever 
the DTFSR, DTFDA, or DTFPH entry LABADDR is 
specified, at least one additional label 
must be written. Upon return to IOCS, the 
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set is terminated and IOCS writes an 
end-of-file record. 



Ta p e Input File 

When an input file is recorded on magnetic 
tape, OPEN rewinds the tape according to 
the specifications in the DTFSR entry 
REWIND. (No rewind is performed if the 
file is defined by DTFPH.) 

St a ndard Label s: Both the first volume 
label (VOL/I) and first file header labels 

(HDR1) are automatically read and checked 
if standard label checking is specified 

(STD specified in DTFSR FILABL or INPUT 
specified in DTFPH TYPEFLE) and if the tape 
is read forward (F ORWARD specified in DTFSR 
READ) . The fields are checked with the 
information supplied by the Job Control VOL 
and TPLAB cards. 

By this label checking, IOCS locates the 
file to be processed if more than one file 
is written on a tape reel (multifile reel) . 
For this, IOCS compares the file sequence 
number in the label with that in the TPLAB 
card. The file sequence number gives the 
sequential position of the file on the 
reel. For example, if the first file on a 
multifile reel has file sequence number 1, 
the third file has file sequence number 3. 
If the first file is numbered 15, the third 
file is numbered 18. The OPEN routines 
bypass all files until a header label with 
the matching file seguence number is read, 
or until the end of the tape is reached. 
Several files on a reel may be processed in 
succession without rewinding the tape if 
the file sequence numbers are specified in 
ascendinq sequence. If not, the tape must 
be rewound before the file to be processed 
is opened. If the tape is positioned 
beyond the desired file when the OPEN for 
that file is executed, message 4114A is 
given to the operator. 

If a tape file that will be read 
bac kward s (BACK specified in DTFSR READ) is 
opened, the fil e trailer label is 
automatically read and checked if label 
checking is specified. The volume label is 
not repeated at the end of the tape. 
Because the file trailer label is, processed 
at this time, it must be complete and 
contain both the trailer and header 
information (except HDR) to identify the 
file. If the file labels were originally 
written by IOCS routines, the trailer label 
will be complete. If the tape is not 
positioned at the trailer label (EOF1) when 
the file is opened, the user is notified 
and readinq continues. This situation is 
possible if the user begins reading 
backwards in the middle of his file. When 
physical IOCS macros are used to read 
records backwards, labels cannot be checked 



and the file must not be defined with DTFPH 
statements. 

If a tape contains user-standard - header 
labels (UHL1-UHL8) following the standard 
file header label (or user-standard trailer 
labels, UTL1-UTL8, preceding the standard 
trailer when reading backwards) , the 
programmer can check them in his own 
routine. The OPEN routine branches to the 
user's routine (identified by the DTFSR or 
DTFPH entry LABADDR) after each user's 
label has been read. Each label is read 
into the label read-in area used by IOCS. 
The address of this area is supplied in 
register 1 upon entry into the user's 
routine. After checking each label, the 
user must return to the OPEN routine by 
useof the LBRET macro. If user-standard 
labels exist but the user does not specify 
LABADDR, the user labels are bypassed by 
IOCS. 

When the tapemark at the end of the 
labels is read, IOCS opens the next file 
specified in the OPEN macro, or returns 
control to the problem program if all files 
have been opened. 

After the labels (if any) for a file 
have been processed, that file is ready for 
the first GET instruction. 

Nonstandard Labels : To process nonstandard 
labels, the user must specify FILABL=NSTD 
and LABADDR=Name , and he must define his 
own label read-in area. To read- the 
nonstandard labels, physical IOCS macro 
instructions must be used instead of 
logical IOCS instructions. A Command 
Control Block (CCB) and a Channel Command 
Word (CCW) must be established, and an EXCP 
instruction must be issued for each label 
must be issued for each label record (see 
Processing Records w ith Physical IOCS) . 

In his label routine, the user issues 
the EXCP and WAIT macro instructions and 
then performs whatever checking he desires 
for the labels. After all labels have been 
read and processed, the user returns 
control to the OPEN routines by use of the 
LBRET macro. 

If a file with nonstandard labels 
utilizes an alternate tape drive (DTFSR 
ALTTAPE=SYSnnn) , IOCS supplies a code 
identifying the symbolic unit (see Figure 
26) of the drive currently being used in 
the two low-order bytes of register 
1. This value must be moved to bytes 4 and 
5 of the Command Control Block (CCB) used 
by the EXCP macro for label reading. 

Tape O utput File 

For a magnetic tape output file, OPEN 
rewinds the tape as specified in the DTFSR 
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entry REWIND. (No rewind is performed if 
the file is defined by DTFPH.) 

Standard Lab els; When standard labels are 
to be written (STD specified in DTFSR 
FILABLE, or OUTPUT in DTFPH TYPEFLE) , the 
volume label is checked and the old file 
header is read and checked to make sure 
that the data on the tape is no longer 
active and may be destroyed. The tape is 
then backspaced and the new file header 
label is written with the information 
supplied by the Job Control TP LAB card. 
The volume label is not rewritten. 

If user-sta n dard header labels 
(UHL1-UHL8) are to be written following the 
standard header label, the OPEN routine 
branches to the user's routine (specified 
by the DTFSR or DTFPH entry LABADDR) after 
each standard label. In his routine, the 
programmer can build a maximum of eight 
user-standard labels. Each label must be 
built in the label output area used by 
IOCS. The address of this area is supplied 
to the user in register 1 upon entry into 
his routine. IOCS also supplies the letter 

0 in the low-order byte of Register 0, to 
indicate that a header label should be 
built. After building each label, he must 
return to the OPEN routine by use of the 

1 BRET macro. Then IOCS writes the label. 
When the user determines that the last user 
label has been written, he must issue the 
LBRET macro with, the operand "1". Whenever 
the DTFSR or DTFPH entry LAEADDR is 
specified, at least one additional label 
must be written. 

After the header labels (if any) for a 
file have been written, the tape is ready 
for the first PUT instruction for that 
file. 

Multifile Reels . More than one file of 
records may be written on cne reel of tape 
(multifile reel) , if desired. If this is 
planned, the DTFSR entry REWIND=NORWD 
should be specified for each file. With 
this specification, the tape is located at 
the correct position for the OPEN routines 
to write the standard file header label for 
each additional file (after the first) on 
the reel. For the first file, the 
programmer can include a CNTRL macro 
instruction (with the operand REW) ahead of 
the OPEN instruction. Or, the operator can 
position the tape at the load point. 

For the standard file header label of 
each file after the first, the OPEN 
routines obtain the file serial number, 
volume seguence number, and file seguence 
number from the preceding standard trailer 
label. They increase the file seguence 
number by 1 for the new file. OPEN writes 
the remaining fields of the header label by 
using the information supplied in the 



corresponding Job Control TPLAB card. As 
with the first file on the reel, 
user-standard header labels may follow the 
standard header label. 

If a tape is rewound or repositioned 
after a file is closed, it is the user's 
responsibility to properly position the 
tape for writing any additional file. The 
tape must be positioned so that the file 
header label is written immediately after 
the tape mark that follows the last file 
currently on the tape. The header label 
will replace the second tape mark that 
normally follows the trailer label (s) of 
the last file on a tape (see C LOSE 
Macro: Tape Output File ) . The tape can be 
advanced from the load point to the correct 
position by skipping three tape marks for 
each file presently on the tape. The 
layout of tape records is: 



Load 
Point 

v |< . File 1 

— j 1 — 1 1 1 : 1 1 1 — r 

1V0L1|HDR1| UHL |TM|DATA RECORDS | TM'| EOF | 

I I I d-8) || 111 
i i i j _j i 1 i_i 

>|< File 2 

i 1 1 1 1 1 « 1 

| UTL | TM | HDR 1 | UHL | TM | DATA RECORDS|TM'| 
I d-8) || | (1-8) || | | 
i i i i j i i i 

>| 

i a 1 1 1 1 

|E0F1 UTL | TM | TM | | 

I ld-8)| | I I 
i i i i i i 

t 

Replaced if another file 
is added to the tape. 

A Job Control FILES card should be used 
to skip the reguired number of tape marks. 
When the tape has been positioned and the 
file is opened, the OPEN routines obtain 
the information for the standard file 
header label from the preceding standard 
trailer label and the Job Control TPLAB 
card, as described in the preceding 
paragraphs. The DTFSR entry REWIND=NORWD 
must be included for this file. 



Nonstandard Labels : To process nonstandard 
labels, the user must specify FILABL=NSTD 
and LABADDR=Name, and he must define his 
own label read-out area. To write - the 
nonstandard labels, physical IOCS macro 
instructions must be used instead of 
logical IOCS macro instructions. A Command 
Control Block (CCB) and a Channel Command 
Word (CCW) must be established, and an EXCP 
instruction must be issued for each label 
record (see P rocess i ng Rec o rds with 
Physical IOCS) . 
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Upon branchinq to the user's label 
routine, IOCS supplies the letter 0 in the 
low-order byte of Register 0 to indicate 
that a header label (s) should be written 
(see DTFSR. LABADDR) . In his routine, the 
user issues the EXCP and WAIT macro 
instructions after he has built each label 
record. After all labels have been 
written, the user returns control to the 
OPEN routines by use of the LBRET macro. 

If a file with nonstandard labels 
utilizes an alternate tape drive (DTFSR 
ALTTAPE=SYSnnn) , IOCS supplies a code 
identifying the symbolic unit (see Figure 
28) of the drive currently being used in 
the two low-order bytes of register 
1. This value must be moved to bytes H and 
5 of the Command Control Block (CCB) used 
by the EXCP macro for label writing. 



LBRET Macro 



1 „ , 

Name | Op 1 Operand | 

1 -i 1 

| LBRET | 1 | 
| LBRET J 2 | 

— i i ; i 



The LBRET (label return) macro instruction 
applies only to disk or tape files that 
contain user-standard labels, or 
nonstandard labels, that the user wants to 
check or build/write. It must be issued at 
the end of the user's label routine 
(specified by the DTFSR, DTFDA, or DTFPH 
entry LABADDR) , to return to IOCS after 
header or trailer labels have been 
processed. This instruction reguires one 
of the following operands: 

Ope ran d 1 User-Standard Labels, Input 

File ;To return to IOCS when the 
user wants to eliminate the 
checking of one or more 
user-standard labels. IOCS 
then skips the remaining labels 
in the set, and processing 
continues. If all labels are 
to be checked, operand 1 is not 
used and IOCS terminates label 
processing when the disk 
end-of-file record or the 
tapemark following the last 
label is read. 

User-Standard Labels, Output 
File: To return to IOCS when 
the user determines that the 
last user-standard label has 
been built. IOCS writes the 
last label (from the label 
output area) and processing 
continues. Operand 1 is always 
reguired to terminate the 
output label set. 



Nonstan d ard labels: Operand 1 
is invalid for files that 
contain nonstandard labels 
(FILABL=NSTD) . 

Operand 2 User-Standard Label s, Input 

File : To return to IOCS after 
each user-standard label has 
been checked. IOCS makes the 
next label, if any, available 
for checking in the label input 
area. When IOCS senses the 
endof the label set (disk 
end-of-file record or 
tapemark) , it terminates label 
processing. 

U ser -Sta ndard Labe ls, Output 
File : To return to IOCS after 
each user-standard label except 
the last has been built. IOCS 
writes the label from the label 
output area and returns to the 
user's label routine to permit 
him to build his next label. 
The label set is terminated by 
LBRET 1. 

N onstandar d labels: To return 
to IOCS after all nonstandard 
labels have been checked or 
written. For nonstandard 
labels, IOCS branches to the 
user's label routine only once, 
and the problem program must 
read or write every reguired 
label before issuing LBRET to 
return to IOCS. 

The LBRET routine reguires the values 
that the IOCS has placed into registers 14 
and 15. Hence, if the user reguires one or 
both of these registers in his routine, he 
must save the value placed into these 
registers by the IOCS before he starts 
using them. He must restore this value 
prior to issuing the LBRET macro 
instruction. 



PROCESSING RECORDS CONSECUTIVELY 

Records in serial-type devices (such as 
card reader, tape unit, printer) and 
records in a 2311 disk file used in a 
serial-type order can be processed 
consecutively. In this type of processing, 
successive records are processed, starting 
at the beginning of a logical file and 
continuing, one record after the other, to 
the end of the file (see T ypes - of 
Processing : Consecutive Processing } . in 
this method the user issues GET .or PUT 
macro instructions to transfer records. 

Whenever a file of records is to be 
processed in consecutive order, the logical 
file, the device used for the file, and the 
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main-storage areas allotted to the file 
must be defined by the declarative macro 
DTFSR (Define The File in a SeRial-type 
device) . The detail parameter entries for 
this definition are described under File 
Definition Macros . 

Rec ord - Types 

IOCS handles records that are: 

• Blocked - two or more logical records 
in one physical record, such as a tape 
record 

• Unblocked - one logical record per 
physical record 

• Fixed-Length - all records the same 
length 

• Variable-Length - the records differ in 
length 

• Undefined - the record characteristics 
are unknown to IOCS. 

IOCS can process all the different types 
in the same program. However, all the 
records in a given file must be the same 
type, and this must be defined in the DTFSR 
entry RECFO.RM for that file. The types of 
records that can be processed vary with the 
type of I/O device used for reading/writing 
the file of records, as shown in the 
illustration (Figure 1 1) . 



When an application using blocked 
records -is planned, the number of records 
that can be allocated for a block depends 
on the size of the records and the amount 
of main storage that can be reserved for 
the block. The programmer must 
predetermine the maximum block size and 
specify this in the DTFSR entry BLKSIZE. 
All records within the block may be fixed 
length or variable length. If the records 
are fixed length, the length of the records 
is specified in DTFSR RECSIZE. 



If the blocked records are variable - 
length , the size of each record - must be 
included within the record itself (Figures 
12 and 13) . This record-length field must 
occupy the first four bytes of each record. 
The first two bytes specify the length of 
the record (including the four bytes for 
the record-length field itself), and the 
next two are blank. In addition, the 
actual length of each block- must be 
recorded on disk or tape, preceding the 
first record in the block. Block length is 
also a four-byte field. The first two 
bytes specify the length of the block 
(including the four bytes for the 
block-length field itself) , and the next 
two are blank. Both block length and 
record length are expressed in 16-bit 
binary form. 
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Figure 11. Types of Records and I/O Devices for Consecutive Processing 
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Figure 13. Schematic of Variable- Length Records on Disk (Consecutive Processing) 
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When unblocked va r iable-lengt h records 
on d isk or tape are processed, each record 
must contain the record-length field in the 
first four bytes, the same as for blocked 
variable-length records. Also, a 
block-length field must precede each record 
(a block of one record) . This four- byte 
field always specifies the record length 
plus 4. 

Because a block-length field must 
precede the first data record whenever 
variable-length records (either blocked or 
unblocked) are processed, this must be 
included in the BLKSIZE specification and 
in the amount of main storage allotted to 
the input/output area. 

When unblocked variable-length records 
are specified for the card, punch or 
printer , a record-length field must be 
included in the first four bytes of each 
output record in main storage . The first 
two bytes must specify the length of the 
record (including the four bytes for the 
record-length field itself) , and the next 
two are blank. The user must supply the 
record length in this field when he builds 
the record. Punching, or printing, of the 
actual data record starts with the first 
position after the record length field, 
unless a control character is included in 
the record (see PUT Macro : Punch and 
Printer Control } . The amount of main 
storage allotted for the punch or printer 
output area must allow for the 4-byte 
record-length field, and the DTFSH BLKSIZE 
specification must include these four 
bytes. 

When undefined records are to be read or 
written, the DTFSR entry RECSIZE must 
specify a register. On input, IOCS 
supplies the physical record size in this 
register. For output, the programmer must 
load the length of each record in this 
register before he issues the PUT for that 
record. 

Record Sizes : The minimum size physical 
tape record (gap to gap) that can be 
handled is 12 characters (11 characters or 
less are considered a noise record) . The 
maximum size tape record is 32K. The 
maximum size input/output record for the 
IBM 1052 Printer-Keyboard is 256 
characters; the minimum size input record 
is one character. The maximum size card or 
printer record cannot exceed the capacity 
of the corresponding I/O unit. 

Storage Areas 

When logical IOCS macro instructions are 
used, each input record can be made 
available to the program for processing 
either in an input area or a work area. 
Similarly, on output, each record can be 



built in a work area or directly in an 
output area. 

Input/output areas and work areas for a 
particular file can be specified and 
handled by IOCS in any of the following 
combinations: 

1. One I/O area 

2. One I/O area and one work area 

3. Two I/O areas 

4. Two I/O areas and one work area. 

If one I/O area (combination 1) is used, 
a register must be specified in DTFSR IOREG 
whenever blocked records are processed or 
unblocked variable-length records are read 
backwards. The register is used to point 
to the beginning of each record and thus 
locate the record for processing. A 
register must also be specified whenever 
two I/O areas (combination 3) are used, 
regardless of whether the records are 
blocked or unblocked. If the blocked 
records are variable lengt h- and are being 
built in the output area (s) , an additional 
register must be specified in DTFSR VARBLD. 
This register provides the programmer with 
the remaining space in the output area each 
time a PUT instruction is executed. 

Whenever a work area (combinations 2 and 
4) is used, a register is not reguired and 
IOREG should be omitted. Instead, DTFSR 
WORKA must be specified and the work area 
must be named in each GET or PUT 
instruction. The various combinations are 
discussed further in the BOS Programmer' s - 
Guide, as listed on the front cover of this 
publication. 

GET Macro 
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This instruction makes the next consecutive 
logical record from an input file available 
for processing in either an input area or a 
specified work area. It is used for any 
input file in the system, and for any type 
of record: blocked or unblocked, fixed or 
variable length, and undefined. When the 
GET macro detects an end-of-file condition, 
IOCS branches to the user's end-of-file 
routine (specified by DTFSR EOFADDR) . 

The GET macro instruction is written in 
either of two forms, depending on the area 
where the records will be processed. 
Either form, but not both, can be used for 
one DTFSR- specified logical file. The 
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first form is used if records are to be 
processed directly in the input area (s) , 
and it reguires only one parameter. This 
parameter specifies the name of the file 
from which. the record is to be retrieved. 
The file name must be the same as the one 
specified in the DTFSR header entry for 
this file. 

The input area must be specified in the 
DTFSR entry T0AREA1. Two input areas may 
be used to permit an overlap of data 
transfer and processing operations. The 
second -area is specified in DTFSR I0AREA2. 
Whenever two input areas are specified, the 
IOCS routines transfer records alternately 
to each area. They completely handle this 
"flip-flop" so that the next consecutive 
record is always available to the problem 
program for processing. 

When records are processed in the input 
area (s) , a general purpose register must be 
specified in the DTFSR entry IOREG if: 

1- Records are blocked, 

2. Variable-length unblocked tape records 
are read backwards, or 

3. Two input areas are used, for either 
blocked or unblocked records. 



This register identifies the next single 
record tc be processed. It always contains 
the absolute base address of the currently 
available record. The GET routine places 
the proper address in the register. 

The s econd fo rm of the GET instruction 
is used if records are to be processed in a 
work area. It causes the GET macro to move 
each individual record from the 
DTFSR- specified input area to a work area. 
As in the first form, the file name must be 
entered as the first parameter . The name 
of the work area must be entered as the 
second parameter, and YES must be specified 
in the DTFSR entry WORKA. The work-area 
name must be the same as that specified in 
the DS instruction that reserves this area 
of main storage . All records from a 
logical file may be processed in the same 
work area, or different records from the 
same logical file may be processed in 
different work areas. In the first case, 
each GET for the file specifies the same 
work area. In the second case, different 
GET instructions specify different work 
areas. It might be advantageous to plan 
two work areas, for example, and to specify 
each area in alternate GET instructions. 
This would permit the programmer to compare 
each record with the preceding one, for a 
control change. Only one work area can be 
specified in any one GET, however. 
Whenever this form of the GET instruction 



is used for a logical file, a register is 
not reguired for indexing (as it is when 
records are processed directly in the input 
area) . 

The GET macro is used to acguire data 
from journal tapes from 1285/1287 optical 
reader files. Processing overlap is 
obtained by using multiple input areas. 

IBM - 26.7,1.- Paper Tape Reader ; Whenever a GET 
instruction is issued for the 2671, bits 6 
and 7 of main-storage location f ilename+ 16 
should be tested to determine if an error 
is detected when a record is read. If a 
data check or eguipment check is detected, 
an error message is issued to the operator. 
The operator's reply to this message 
determines if bit 6 or 7 is turned on. 

If bit 6 is on, the record has been 
read, but one or more characters in the 
record are in error. Bit 6 is turned on by 
an operator reply (4) to continue reading 
the record and ignore the character that 
caused the error. 

If bit 7 is on, the operator has 
positioned the tape either at the beginning 
of the same record or at the beginning of 
the next available record. Bit 7 is turned 
on by. an operator reply (other than 0-5) 
either to reread or ignore the record 
containing the error. The next GET 
attempts another read operation on the 
current record or reads the next available 
record. If a torn tape prompts the 
operator to advance the tape, more than one 
record may be lost. 

As another choice for a data check, the 
operator may backspace two characters and 
attempt another read operation (reply 5). 
If this read is correct, no data check has 
been detected and processing continues. 
Neither bit 6 nor 7 is turned on. If an 
error is detected, however, the operator 
may reply with a 4 that turns on bit 6, or 
with any character other than 0-5 that 
turns on bit 7. 

Unblocked Records 

Records retrieved from any input file 
except disk or magnetic tape are always 
considered unblocked (specified as 
unblocked or undefined) . Records on disk 
or tape are treated as unblocked if this is 
specified in the DTFSR entry RECFORM . 

Whenever records are unblocked (either 
fixed or variable length) and only one 
input area is used, each GET transfers a 
single record from an I/O device to the 
input area, and then to a work area if one 
is specified in the GET instruction. If 
two input areas are specified, each GET 
makes the last record that was transferred 
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to main storage available for processing in 
the input area or work area. The same GET 
also starts the transfer of the following 
record to the other input area. 

When an IBM , 2540 Ca rd Read-Punch is used 
for a card input file, each GET instruction 
normally reads the record from a card in 
the read feed. However, if the 2540 has 
the punch-feed-read special feature 
installed and if CMBND is specified in the 
DTFSR entry TYPEFLE, each GET reads the 
record from a card in the punch feed, at 
the punch-feed-read station. This record 
can be updated by additional information 
and punched back into the same card, when 
that card passes the punch station and a 
PUT instruction is issued. (See 
PUT : Updating. ) 

On the IBM 1285 and 1287 Optical 
Eeaders, fixed unblocked records should be 
used when processing journal tapes 
containing lines with an egual number of 
characters. For documents on the 1287, 
processing is similar to that of undefined 
records, because the fields read may be 
treated as either fixed- or variable-length 
by setting the suppressed length indicator 
(SLI — flag bit 34) in the CCW used to read 
the document field. However, the user is 
not required to use RECSIZE and 10 REG, and 
can eliminate these two registers if he 
desires. 

Blocked Reco rds 

When records on disk or tape are specified 
as blocked in the DTFSR entry RECFORM, each 
individual record must be located for 
processing (deblocked) . Therefore, blocked 
records (either fixed or variable length) 
are handled as follows: 

1. The first GET instruction transfers a 
block of records from disk or tape to 
the input area. It also initializes 
the specified register to the absolute 
address of the first data record, or it 
transfers the first record to the 
specified work area. 

2. Subsequent GET instructions either add 
an indexing factor to the register or 
move the proper record to the specified 
work area, until all records in the 
block have been processed. 

3. Then the next GET makes a new block of 
records available in main storage , and 
either initializes the register or 
moves the first record. 

Undefined Records 

When undefined records are to be handled, 
the DTFSR entries RECFOR M=UNDEF and 
RECSIZE=n must be included in the file 



definition. GET treats undefined records 
as unblocked, and the programmer must 
locate individual records and fields. 
Undefined records are considered to be 
variable in length by IOCS. No other 
characteristics of the record are known by 
IOCS. They are the responsibility of the 
user. 

Journal tapes containing lines of 
variable character length are processed in 
this manner on the 1285 and 1287. When 
documents specified as undefined are 
handled by the 1287 reader, the entry 
RECSIZE pertains only to the last field 
read by the channel command word chain. 

Read Backwards, Tape 

If records on tape are to be read backwards 
(BACK specified in DTFSR entry READ) , 
unblocked records or blocks of fixed-length 
records are transferred from tape to main 
storage in reverse order. The last block 
is read first; the next-to-the-last block, 
second; etc. For blocked records, each GET 
instruction also makes the individual 
records available in reverse order. The 
last record in the input area is the first 
record available for processing (either by 
indexing or in a work area) . 
Variable-length blocked records cannot be 
read backwards. 

Nine-track tape can be read backwards 
without qualification, but 7-track tape can 
be read backwards only if: 

• the tape was originally written on a 
magnetic tape unit of the IBM 
System/360, 

• the Data Conversion special feature was 
n ot used when the tape was written, and 

• a tape mark was written at the 
beginning of the tape preceding the 
data records. 

PUT Macro 
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This instruction writes, punches, or 
displays logical records that have been 
built directly in the output area or in a 
specified work area. It is used for any 
output file in the system, and for any type 
of record: blocked or unblocked, fixed or 
variable length, and undefined. It 
operates much the same as GET but in 
reverse. It is issued after a record has 
been built. 
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Similar to GET, the PUT macro 
instruction is written in either of two 
forms, depending on the area where the 
records are built. Either form, but not 
both, can be used for one DTFSR-specified 
logical file. The f irst form is used if 
records are built directly in the output 
area (s) , and it requires only one 
parameter. This parameter specifies the 
name of the file to which the record is to 
be transferred. The file name must be the 
same as the one specified in the DTFSE 
header entry for this file. 

The output area must be specified in the 
DTFSR entry I0AREA1. Two output areas may 
be used to permit an overlap of data 
transfer and processing operations. The 
second area is specified in DTFSR I0AREA2. 
Whenever two output areas are specified, 
the IOCS routines transfer records 
alternately from each area. They 
completely handle this "flip-flop" so that 
the proper output- record area is always 
available to the program for the next 
consecutive output record. 

When records are built in the output 
area (s) , a general-purpose register must be 
specified in the DTFSR entry IOREG ift 

1. Records are blocked, or 

2. Two output areas are used, for either 
blocked or unblocked records. 

This register always contains the 
absolute base address of the currently 
available output-record area. The PUT 
routine places the proper address in the 
register . 

The s econd f orm of the PUT instruction 
is used if records are built in a work 
area. It causes the PUT macro to move a 
record from a specified work area to the 
proper location in the DTFSR-specified 
output area. As in the first form, the 
file name must be entered as the first 
parameter. The name of the work area is 
entered as the second parameter, and YE S 
must be specified in the DTFSR entry WORKA. 
The work-area name must be the same as that 
specified in the DS instruction that 
reserves the area of main storage . 
Individual records for a logical file may 
be built in the same work area or in 
different work areas. Each PUT instruction 
specifies the work area where the completed 
record was built. However, only one work 
area can be specified in any one PUT 
instruction. Whenever this form of the PUT 
instruction is used for a logical file, a 
register is not required for indexing. 

Whenever an output data record is 
transferred from an output area to an I/O 
device (by a PUT instruction), the data 



also remains in the output area until it is 
either cleared or replaced by other data. 
IOCS does not clear the output area. 
Therefore, if the user plans to build 
another record whose data does not use 
every position of the output record area, 
he must clear that area before he builds 
the record. If this is not done, the new 
record will contain interspersed characters 
from the preceding record. For example, in 
the case of output to a printer, the forms 
design may require printing in selected 
positions on one print line and in 
different positions on another line. In 
this case, the output area for the printer 
file should be cleared between lines. 

Unblocked Record s 

Records transferred to any output file 
except disk or magnetic tape are always 
considered unblocked (specified as 
unblocked or undefined) . Records for disk 
or tape recording are treated as unblocked 
if this is specified in the DTFSR entry 
RECFORM. 

Whenever records are unblocked (either 
fixed or variable length) , each PUT 
transfers a single record from the output 
area (or input area if updating is 
specified) to the file. If a work area is 
specified in the PUT instruction, the 
record is first moved from the work area to 
the output area (or input area) and then to 
the file. 

Blocked Records 

When blocked records are to be written on 
disk or tape (as specified in DTFSR 
RECFORM) , the individually built records 
must be formed into a block in the output 
area. Then the block of records is 
transferred to the output file. The 
blocked records may be either fixed or 
variable length. 

Fixed-length blocked re c ord s can be 
built directly in the output area or in a 
work area. Each PUT instruction for these 
records either adds an indexing factor to 
the register, or moves the completed record 
from the specified work area to the proper 
location in the output area. When an 
output block of records is complete, PUT 
causes the block to be transferred to the 
output file and initializes the register if 
one is used. 

Variable-l e ngth blocked records can also 
be built in either the output area or a 
work area. The length of each 
variable-length record must be determined 
by the problem program and included in the 
output record as it is built. The problem 
program can calculate the length of the 
output record from the length of the 
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corresponding input records. That is, 
variable-length output records are 
generally developed from previously written 
variable-length input records, perhaps 
modified by current- records. Each 
variable-length input record must include 
the field that contains the length of the 
record (see Figures 12 and 13) . 

When variable-length blocked records are 
built in a work area, the PUT instruction 
performs approximately the same functions 
as it does for fixed-length blocked 
records. The PUT routines check the length 
of each output record to determine if the 
record will fit in the remaining portion of 
the output area. If the record will fit, 
PUT immediately moves the record. If it 
will not fit, PUT causes the completed 
block to be written and then moves the 
record. Thus, this record becomes the 
first record in a new block. 

If variable-length blocked records are 
to be built directly in the output area 
however, an additional DTFSR entry, a TRUNC 
macro, and additional user programming are 
reguired. The user's program must 
determine if each record to be built will 
fit in the remaining portion of the output 
area. This must be known be fore processing 
of the record is started so that, if the 
record will not fit, the completed block 
can be written and the record can be built 
at the beginning of a new block. Thus, the 
length of the record must be pre-calculated 
and compared with the amount of remaining 
space. 

The amount of space available in the 
output area at any time can be supplied to 
the program (in a register) by the IOCS 
routines. For this, the user must specify 
a general- purpose register in the DTFSR 
entry VARBLD. This register is in addition 
to the register specified in DTFSR IOREG. 
Each time a PUT instruction is executed, 
IOCS loads into this register the number of 
bytes remaining in the output area. The 
problem program uses this to determine if 
the next variable-length record will fit. 
If it will not fit, a TRUNC macro 
instruction must be issued to transfer the 
block of records to the output file and 
make the entire output area available for 
building the next block. 

Undefined Records 

When undefined records are handled, PUT 
treats them as unblocked. The programmer 
must provide any blocking he wants. He 
must also determine the length of each 
record (in bytes) and load it in a register 
for IOCS use, before he issues the PUT 
instruction for that record. The register 
that will be used for this purpose must be 
specified in the DTFSR entry RECSIZE. 



Updating 

A consecutive file on 2311 disk, a card 
input file in a 1442 or 2520, or a card 
file in the punch feed of a 2540 equipped 
with the punch-feed-read special feature, 
can be updated. That is, each disk or card 
record can be read, processed, and 
transferred back to the same disk location, 
or card, from which it was read. This 
function must be specified in the file 
definition. For a disk file, the DTSFR 
entry UPDATE must be specified. In the 
case of a card file, the file must be 
specified as a combined file (CMBND) in the 
DTFSR entry TYPEFLE. 

One I/O area can be specified (DTFSR 
entry 10 AREA 1 ) for both the input and 
output of a disk or card record. If the 
IBM 1442 is used, however, separate areas 
can be specified for input and output 

(DTFSR entries INAREA and OUAREA ) . Each 
disk or card record is transferred to the 
specified input area (I0AREA1 or INAREA) by 
a GET instruction. After the record is 
processed, the next PUT instruction causes 
the updated record to be written in the 
same disk location, or punched in the same 
card, from which the record was read. PUT 
transfers the record from the main storage 
area specified by I0AREA1 (same area for 
both input and output) or by OUAREA 

(separate input and output areas) . If a 
work area is specified in the PUT 
instruction, PUT first moves the updated 
record from the work area to the area 
specified by IOAREA1 or OUAREA, and then 
writes the disk record or punches the card. 

A GET instruction must always precede a 
PUT instruction for a disk or card record, 
and bnly one PUT can be issued for each 
record. For a file in a 2540 or 2520 with 
the punch-feed-read special feature, a PUT 
instruction must be issued for each card, 
and between jobs the 2540 punch must be run 
out. A PUT instruction may be omitted, 
however, if a particular disk record or a 
card record in a 1442 does not reguire 
updating. 

The user, while using logical IOCS 
(TYPEFLE=CMBND) , is provided with the 
standard read error recovery procedure when 
reading and punching into the same card. 
No punch error recovery procedure, however, 
is provided. 

Punch a nd Printe r Control 

Card selection in a card read-punch and 
line spacing or skipping in a printer can 
be controlled either by specified 
characters in the data records or by the 
CNTRL macro instruction. Either method, 
but not both, may be used for a particular 
logical file. 
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When control characters in data records 
are to be used, the DTFSR entry CTLCHR must 
be specified, and every record must contain 
a control character in the main-storage 
output area. This must be the first 
character of each fixed-length or undefined 
record, or the first character following 
the record-length field in a 
variable-length record. The DTFSE BLKSIZE 
specification for the output area must 
include the byte for the control character 
and, if undefined records are specified, 
the DTPS R RECSIZE specification must also 
include this byte. 

The particular character included in the 
record is determined by the function to be 
performed. For example, if double spacing 
is to occur after a particular line is 
printed, the code for double spacing must 
be the control character in the output line 
to be printed. The control-character codes 
are the same as the command codes 
(including the modifier bits) used for a 
punch or delayed-print command. 

When a PUT instruction is executed, the 
control character in the data record 
becomes the command code (byte) of the 
Channel Command Word (CCW) that IOCS 
establishes. The first character after the 
control character in the output data 
becomes the first character punched or 
printed. 

If the CNTRL macro instruction is used 
for non-data orders to the punch or printer 
(see CNTRL Macro) , the DTFSE entry CONTROL 
is specified and DTFSR CTLCHR must be 
omitted. In this case, any control 
characters included in data records are 
ignored when the PUT instruction is 
executed. They are treated as data. 



RELSE Ma cro 
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The RELSE macro instruction is used in 
conjunction with blocked input records read 
from disk or tape. It allows the 
programmer to skip the remaining records in 
a block and continue processing with the 
first record of the next block when the 
next GET instruction is issued. This 
function can apply to a job in which 
records on disk or tape are categorized. 
Each category (perhaps a major grouping) is 
planned to start as the first record in a 
block. For selective reports, specified 
categories can be located readily by 
checking only the first record in each 
block. 



The symbolic name of the file, specified 
in the DTFSR header entry, is the only 
parameter reguired for this instruction. 

The release instruction discontinues the 
deblocking of the present block of records, 
which may be either fixed or variable 
length. RELSE causes the next GET 
instruction to transfer a new block to the 
input area, or switch I/O areas, and make 
the first record of the next block 
available for processing. GET initializes 
the register or moves the first record to a 
work area. 

TRUNC Macro 

i 1 1 1 

| Name | Op | Operand | 
j 1 1 J 

| | TRUNC| filename | 
i i i i 

The TRUNC (truncate) macro instruction is 
used in conjunction with blocked output 
records that will be written on disk or 
tape. It allows the programmer to write a 
short block of records. (Blocks do not 
include padding.) Thus the TRUNC macro can 
be used for a function similar to the RELSE 
instruction for input records, but in 
reverse. That is, when the end of a 
category of records is reached, that block 
can be written and the new category can be 
started at the beginning of a new block. 

The symbolic name of the file, specified 
in the DTFSR header entry, is the only 
parameter reguired in this instruction. If 
this macro is issued for fi xed - length 
blocked disk records, the DTFSR entry 
TRUNCS must be included in the file 
definition. 

When TRUNC is issued, the short block is 
written (on disk or tape) and the output 
area is made available to build the next 
block. The last record included in the 
short block is the record that was built 
before the last PUT instruction preceding 
TRUNC was executed. Therefore if records 
are built in a work area and the problem 
program determines that a record belongs in 
a new block, the TRUNC instruction should 
be issued first, followed by the PUT 
instruction for this particular record. If 
records are built in the output area, how- 
ever, the programmer must determine if a 
record belongs in the block before he 
builds the record. 

Whenever variable-leng th blocked record s 
are built directly in the output area, this 
TRUNC instruction must be used to write a 
completed block of records. When the PUT 
instruction is issued after each 
variable-length record is built, the output 
routines supply the programmer with the 
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space (number of bytes) remaining in the 
output area. From this the programmer 
determines if his next variablerlength 
record will fit in the block. If it will 
not fit, he issues the TRUNC instruction to 
write out the block and make the entire 
output area available to build the record. 
The amount of remaining space is supplied 
in the register specified in the DTFSR 
entry VARBLD (see PUT Macro and DTFSR 
VARBLD) . 

READ Macro 
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The READ macro is used to transfer records 
from the IBM 1287 Optical Reader operating 
in document mode. All operands are 
reguired. The first p arameter specifies 
the symbolic name ©f the file as given in 
the DTFSR header entry. The second 
parameter, OR, indicates an optical 
character reader. The third p aramet er 
specifies the address of the user- provided 
channel command word list. The first 
channel command word in the list cannot be 
a transf er-in-channel CCW. To designate 
the address of the channel command word 
list, a register entry is used in this 
paramete r. 

Note: Document ejection and/or stacker 
selection and document increment functions 
can also be accomplished by including the 
appropriate CCW (s) within the channel 
command word list addressed by the READ 
macro rather than by using the CNTRL macro. 
This technigue results in increased 
document throughput. 

READ generates an EXCP and a CCB macro, 
which cause a branch to the user- provided 
channel command chain. When documents are 
being processed, only one input area may be 
used. The contents of the input, area may 
later be moved to a user-defined work area. 
Overlap can thus be obtained by processing 
the contents of the work area as the 
subsequent document is being read into the 
input area. Dividing the fields in a 
document into blocks, and processing one 
block while reading the rest, is another 
means of achieving overlap. 

At least one reference mark is reguired 
for all documents. New coordinates for the 
reference mark must be specified whenever a 
rotation in printing occurs or when a 
document is incremented. For this reason, 
a load format CCW that specifies the 
coordinates of the reference mark 
associated with a particular group of 



fields must be the first CCW in all user 
channel command word chains. 

WAITF Macro 
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The WAITF macro instruction is used only 
with the 1287 Optical Reader in document 
mode for consecutive processing. It 
ensures that the transfer of a record has 
been completed. One parameter, the 
symbolic name of the file, is reguired. 

With this instruction, the program waits 
until data transfer is complete. 
Therefore, the instruction must come after 
a READ and before the next READ for the 
same file. It must be issued before the 
problem program attempts to process an 
input record for that file. 

RDLNE Macro 



i n 1 1 

| Name I Operation | Operand | 

I 1 1 1 

|[ name]| RDLNE J filename | 
i i i ; i 



The RDLNE macro selectively performs 
on-line correction when journal tapes are 
processed on the IBM 1285 or 1287 Optical 
Reader. This macro causes the reader to 
read a line in the on-line correction mode 
while processing in the off-line correction 
mode. If the reader cannot read a 
character, IOCS retries the line that 
contains the unread character. If this 
retry is unsuccessful, the user is informed 
of the condition in his error correction 
routine (specified in DTFSR COREXIT) . He 
may then issue the RDLNE macro causing 
another attempt to read the line. If the 
character in the line cannot be read during 
this attempt, the character is displayed on 
the 1285 or 1287 display scope and the 
operator, if possible, keys in the correct 
character. If the operator cannot readily 
correct the error by keying in the correct 
character, he may enter the reject 
character in the line in error. This 
condition is posted in Filename+17 and is 
available for the user to examine. 
Wrong-length records or incomplete reads 
are also posted in Filename* 17. See the 
description of COREXIT for hexadecimal 
indications. RDLNE should be used only in 
COREXIT. Otherwise, the line following the 
one in error is read in the on-line 
correction mode. 

The macro requires only one parameter 
(the symbolic name of the 1285 or 1287 file 
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from which the record is to be retrieved) . 
This name is the same as that specified in 
the DTFSR header entry for this file. 

Note ; When the RDLNE macro is used, the 
user must include the' parameter OFFLINE=YES 
in his DTFSR- entries. 

DSPLY Macro 



i 1 1 -■ 1 

|Name | Operation | Operand | 

I 1 1 1 

|[ name ]| DSPLY | Filename, r,r | 
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The DSPLY macro is used to display a 
document field on the display scope of the 
1287. The field is displayed for the 
purpose of keying in a complete field cn 
the keyboard when a 1287 read error makes 
this type of correction necessary. If a 
1287 read error occurs and the reject 
character is entered in the field in error 

(either by the operator if processing in 
the on-line correction mode or by the 
device if processing in the off-line 
correction mode) , the user may use the 
DSPLY macro to display the field in error. 
When the 1287 display tube displays the 
full field, the operator, if possible, keys 
in the correct field from the keyboard. 
The field read from the keyboard is always 
read into the address specified in the CCW 

(normally within IOAREA1) that was 
originally intended for the field. The 
macro first blanks this field. At 
completion of the operation, the data is 
left- justified in this field. 

This instruction always requires three 
parameters. The first parameter specifies 
the symbolic name of the 1287 file from 
which the record is to be retrieved. This 
name is the same as that specified in the 
DTFSR header entry for this file. The 
second parameter specifies a general 
purpose register (2-11) into which the 
problem program has placed the address of 
the Load Format CCW that provides the 
document coordinates for the field to be 
displayed. The address of this Load Format 
CCW is obtained by subtracting 8 from the 
address found in a half-word core location 
at Filename* 10 when the macro is used in 
the COREXIT routine. Otherwise the user 
must determine the Load Format CCW address. 

The third parameter specifies a general 
purpose register (2-11) into which the 
problem program has placed the address of 
the Load Format CCW that provides the 
coordinates of the reference mark 
associated with the field to be displayed. 
When using the DSPLY Macro, the user must 
ensure that the Load Format CCW that 
provides the document coordinates for the 
field to be displayed (second parameter) , 



is command chained to the CCW used to read 
that field. 

Note: The contents of Filename+17 are 
meaningful only for X'40 1 (1287 scanner 
cannot locate the reference mark) and X'04' 
(wrong length record), after issuing the 
DSPLY macro. Therefore the user must 
determine whether the operator was able to 
recognize the unreadable line of data. 

RESCN Macro 
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The RESCN macro selectively rereads a field 
on a document when a defective character 
makes this type of operation necessary. 
The field read is always read 
right- justified into the address specified 
in the CCW (normally within IOAREA1) that 
was originally intended in the field. 

The parameter filename specifies the 
symbolic name of the 1287 file from which 
the record is to be retrieved. This name 
is the same as that specified in the DTFSR 
header entry for this file. The second 
parameter specifies a general purpose 
register (2-11) into which the problem 
program has placed the address of the Load 
Format CCW that provides the document 
coordinates for the field to be read. The 
address of this Load Format CCW is obtained 
by subtracting 8 from the address found in 
a half-word core location at Filename* 10 
when the macro is used in the COREXIT 
routine. Otherwise the user must determine 
the Load Format CCW address. The third 
parameter specifies a general purpose 
register (2-11) into which the problem 
program has placed the address of the Load 
Format CCW that provides the coordinates of 
the reference mark associated with the 
field to be read. The previous three 
parameters are always reguired, and result 
in one reread of the unreadable field. 

The fourth parameter is required if the 
user wishes to attempt more than one reread 
of the unreadable field. This parameter 
(n) is the number of additional retries 
(nine maximum) to be attempted. The fifth 
parameter (F) indicates one more reread. 
It forces on-line correction of any 
unreadable characters by individually 
projecting the unreadable character(s) on 
the 1287 display scope. The operator must 
then key in a correction (or reject) 
character (s) . The user must determine 
whether the read operation generated by 
RESCN has resulted in a more satisfactory 
read. If the reread of the field results 
in a wrong length record, incomplete read, 
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or an unreadable character error condition, 
it is posted in Filename+17. (See 
description of COREXIT for hexadecimal 
values. ) 

When using the RESCN macro, the user 
must ensure that the Load Format CCW, which 
provides the document coordinates for the 
field to be read (second parameter) , is 
command chained to the CCW used to read 
that field. 

CNTRL Macro 
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The CNTRL (control) macro instruction 
provides orders for these input/output 
units: magnetic tape units, card 
read-punches, printers, optical readers, 
and disk drives. Orders apply to physical 
non-data operations of a unit (with the 
exception of the 1285 and 1287 Optical 
Readers) and are peculiar to the unit 
involved. They specify such functions as 
rewinding tape, card stacker selection, 
line spacing on a printer, etc. For 
optical readers they specify marking an 
error line or keyboard correcting a line 
for journal tapes, and stacker selecting, 
ejecting, and incrementing documents. When 
a CNTRL macro instruction is executed, 
except for certain mnemonics used for 
optical readers, operation does not wait 
for completion of the order before 
returning control to the user. 

CNTRL is used in conjunction with a 
logical file in a unit, and it reguires 
either two, three, or four parameters. The 
fir st parameter must be the name of the 
file specified in the DTFSR header entry. 
The second parameter is the mnemonic code 
for the order to be performed. This must 
be one of a set of predetermined codes 
(Figure 14) . The third parameter (n) is 
reguired whenever the UCS (Universal 
Character Set) feature is used, or a number 
is needed for stacker selection, immediate 
printer carriage control or signal count 



for STR devices. The fou rth p aram e ter (m) 
applies only to printer control and is 
reguired for delayed spacing or skipping. 
A number specified as either the third or 
fourth parameter must be a self-defining 
value. 

Whenever CNTRL is issued in the problem 
program, the DTFSR entry CONTROL must be 
included in the file definition. 

The CNTRL macro instruction must not be 
used for printer or punch files if the data 
records contain control characters and the 
DTFSR entry CTLCRR is included in the file 
definition . 

Mag netic Tape Units 

The CNTRL macro instruction is used to 
control magnetic-tape functions that are 
not concerned with reading or writing data 
on the tape. These functions are grouped 
in the following categories: 

Rewinding tape to the load point 
REW - Rewind 
RUN - Rewind and unload 

Moving tape to a specified position 
BSR - Backspace to interrecord gap 
BSF - Backspace to tapemark 
FSR - Forward space to interrecord gap 
FSF - Forward space to tapemark 

Writing a tapemark 
WTM - Write tapemark 

Erasing a portion of the tape 
ERG - Erase gap (writes blank tape) 

The tape rewind (REW and RUN) and tape 
movement (BSR, BSF, FSR, and FSF) functions 
can be used before a tape file is opened. 
This allows the tape to be positioned at a 
desired location for opening a file under 
conditions such as: 

• The file is located in the middle of a 
multifile reel. 

• The DTFSR entry REWIND specifies NORWD, 
but for some conditions rewinding is 
required for the file. 
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UNIT 


MNEMONIC 
CODE 


n* 


m** 


ORDER 


2400 Series 
Magnetic Tape Units 


REW 

RUN 

ERG 

WTM 

BSR 

BSF 

FSR 

FSF 


- 
- 


- 
- 


Rewind Tape 

Rewind and Unload Tape 

Erase Gap (Writes Blank Tape) 

Write Tape Mark 

Backspace to Interrecord Gap 

Backspace to Tape Mark 

Forward Space to Interrecord Gap 

Forward Space to Tape Mark 


1403, 1404, 1443, 1445 Printers 


SP 

SK 


a 
b 


d 
e 


Carriage Space n Lines 
Skip to Channel n 


1403 Printer with UCS Feature 


UCS 
UCS 


YES 
NO 


- 


Ignore Data Checks 
Accept Data Checks 


2540 Card Read - Punch 


PS 


c 




Select Stacker n 


1 442, 2520 Card Read - Punch 


SS 


c 




Select Stacker n 


231 1 Disk Storage Drive 


SEEK 






Seek 


1285 Optical Reader 


READKB 
MARK 


- 


- 


Read 1285 Keyboard 
Mark Error Line 


1287 Optical Reader 


READKB 

MARK 

EJD 

SSD 

ESD 

INC 


c 
c 


- 


Read 1287 Keyboard 

Mark Error Line in Journal Tape Mode 

Eject Document 

Select Stacker n 

Eject and Select Document 

Increment Document at Read Station 


STR Devices "j* 


EOF 
INQ 
PREP 
TEL 


f 
f 
f 
f 


- 


End of Transmission 

Inquiry 

Prepare 

Alternate Mode 


BCS Support -j- 


PRP 

EOT 

WABT 

DSC 

ENQ 






Prepare 

End of Transmission 
Wait before Transmitting 
Disconnect 
Inquiry 


* a = Number of lines to be spaced immediately 

b = Number of the carriage tape channel to skip to immediately 
c = Number of the stacker to which a card or document is to be selected 
** d = Number of lines to be spaced after printing 

e = Number of carriage tape channel to skip to after printing 

* f = Count to be used if other than: 

EOF - 2 
INQ - 10 

PREP - Not applicable 
TEL - 2 

"J" See Input/Output Control Macros 



Figure 14. CNTRL Macro Instruction Codes 
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The tape movement functions (BSR, BSF, 
FSR # and FSF) apply to input files only, 
and the following factors should be 
considered: 



1. The FSR (or BSR) function permits the 
user to skip over a physical tape 
record (from one interrecord gap to the 
next) . The record is passed without 
being read into main storage . The FSF 
(or BSF) function permits the user to 
skip to the end of the logical file 
(identified by a tapemark) . 



2. The functions of FSR , FSF, BSR, and BSF 
always start at an interrecord gap. 



3. If blocked input records are being 

processed and if the user does not want 
to process the remaining logical 
records in the block, as well as one or 
more succeeding blocks (physical 
records) , he must issue a REUSE macro 
before the CNTRL macro. Then the next 
GET vill make the first record of the 
new block available for processing. If 
the CNTRL macro, with FSR for example, 
were issued with o ut a preceding RELSE, 
the tape would be advanced but the next 
GET would make the next record in the 
old block available for processing. 



4. For any I/O area combination except one 
I/O area and no work area, IOCS is 
always reading one physical tape record 
ahead of the one that is being 
processed. Thus, the next physical 
record (block) after the one being 
processed will be in main storage ready 
for processing. Therefore if a CNTRL 
FSR function is performed, the s econd 
physical tape record beyond the present 
one will be passed without being read 
into main storage. 



5. If an FSR function (or BSR in a read 
backwards file) passes a tape mark, 
IOCS branches to the end-of- volume 
routine. 



6. If any of these four functions is used 
during the processing of a file, the 
block count accumulated for checking 
standard labels, or accumulated for the 
checkpoint macro, could be wrong. The 
operator can bypass an erroneous block 
count when checking standard labels. 
However, since it is impossible to 
reposition the tape correctly if the 
block count is wrong in a checkpoint 
record, these commands should not be 
issued when using the checkpoint macro. 



Printers 

The CNTRL macro instruction is used for any 
printer forms control other than the 
standard single spacing. 

The CNTRL macro codes for printer 
operations cause spacing (SP) over a 
specified number of lines, skipping (SK) to 
a specified location on the form 

(represented by a carriage-tape channel) , 
or ignoring/accepting data checks for 
unprintable characters when the Universal 
Character Set (UCS) special feature is 
installed in a 1.403. The third parameter 
is reguired for immediate spacing or 
skipping (before printing) , or to ignore 

(YES) or accept (NO) data checks. The 
fourth parameter is reguired for delayed 
spacing or skipping (after printing) . 

The SP and SK operations can be used in 
any seguence. However, two or more 
consecutive immediate skips (SK) to the 
same carriage channel on the same printer 
have the same effect as the first skip 
only. That is, any skip order after the 
first is ignored. Two or more consecutive 
delayed spaces (SP) and/or skips (SK) to 
the same printer result in the las t space 
or skip only. Any other combination of 
consecutive controls (SP and SK) , such as 
immediate space followed by a delayed skip 
or immediate space followed by another 
immediate space, causes both specified 
operations to occur. 

The CNTRL UCS macro instruction 
generates a command code to ignore, or 
accept, data checks for unprintable 
characters. If the parameter YES is 
specified, data checks resulting from 
unprintable characters are ignored and 
processing continues. If the parameter NO 
is specified, an unprintable character data 
check causes processing to stop and a 
message to be issued to the operator. The 
generated command code remains fixed until 
another CNTRL UCS instruction is issued, or 
until the command code is changed by an 
ASSGN control card or the UCS load buffer 
program. If CNTRL UCS is issued for .a 
printer without the Universal Character Set 
special feature, a command reject occurs 
and the system enters the wait state. 

IBM 2540 Card Read-Punch 

Cards fed into the IBM 2540 read feed are 
normally selected by IOCS to stack in the 
R1 pocket, and those fed in the punch feed 
are selected to stack in the P1 pocket. 
The CNTRL macro code PS is used to select a 
card into a different stacker, specified 
bythe third parameter (n) in this 
instruction. Whenever CNTRL is used for 
any cards in a file, all cards must be 
selected by this macro. For an input file. 
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each GET instruction must be followed by a 
CNTRL instruction to properly select the 
card just read. For an output file, each 
PUT must be preceded by a CNTRL instruction 
to properly select the card that will 
contain the record being built. The 
possible selections are: 



Selection Number 



Feed 


Pocket 


Read 


HI 


Read 


R2 


Read 


RP3 


Punch 


P1 


Punch 


P2 


Punch 


RP3 



For input files, the CNTRL macro can be 
used only when one I/O area, or one I/O 
area and one work area, is specified for 
the file. For output . files, the CNTRL 
macro may be used in conjunction with any 
of the permissible I/O area and work area 
combinations (see Pro cessing Records 
Con se cu tively: Stor ag e Areas ) . 

IBM -1*142 or 2520 Card Read-Pun ch 

Cards fed in the IBM 1442 or 2520 are 
normally stacked in pocket 1. However, 
they may be selected to stack in pocket 2 
by using the CNTRL macro code SS. 

In a card-re ad operation (input or 
combined file) , a card can be selected to 
pocket 2 by issuing the CNTRL instruction 
after the GET instruction for that card, 
and before the GET instruction for the 
following card is issued. When the 
following card is read, the first card is 
stacked in pocket 2. Whenever CNTRL is 
used for any card in an input file with a 
work area, all cards must be selected by 
this macro. 

Whenever CONTROL = YES is specified in 
DTFSR (Output File), the first POT for that 
file must be preceded by a CNTRL macro. 

For input files, the CNTRL macro can be 
used only when one I/O area, or one I/O 
area and one work area, is specified for 
the file. For output files, the CNTRL 
macro may be used in conjunction with any 
of the permissible I/O area and work area 
combinations (see Processing Records 
Consecutively: Storage Areas ) . For 
combined files" (DTFSR TYPEFLE=CMBND) , the 
CNTRL macro can be used only when one I/O 
area (no work area) is specified for the 
file. 

IBM 2311 Disk S t orage Drive 

The CNTRL macro for seeking on the 2311 
applies only to files processed 
consecutively or by the direct access 
method (DAM) . It does not apply to files 



processed by the indexed seguential system 
(ISFMS). This macro permits access 
movement to begin for the next READ, WRITE, 
GET, or PUT instruction for a file. While 
the arm is moving, the programmer may 
process data and/or reguest I/O operations 
on other devices. 

To use CNTRL for seeking in the direct 
access method, the user must first specify 
a track address to which access movement 
should begin. This address must be stored 
in the track- reference field specified by 
the DTFDA entry SEEKARD. (The user must 
supply this address before issuing the 
CNTRL macro instruction.) For consecutive 
files, IOCS seeks the track that contains 
the next block (or physical record) for the 
file. The user does not supply a track 
address. 

If the CNTRL macro is not used, IOCS 
performs the seek operation when a READ, 
WRITE, GET, or PUT instruction is executed. 



IBM 1285 or 1287 Optical Reader 

The CNTRL macro instruction with the READKB 
mnemonic allows the user to read a complete 
line from the 1285 or 1287 keyboard when 
processing journal tapes. This permits the 
user to key in a complete line on the 
keyboard when a read error makes this type 
of correction necessary. When IOCS exits 
to the user's COREXIT routine, the user may 
issue the CNTRL macro instruction to read 
the keyboard. The display tube will 
display the full line and the operator 
will, if possible, key in the correct line 
from the keyboard. The line read from the 
keyboard will be available in the area that 
previously contained the erroneous record, 
i.e., the area that the GET macro 
instruction was serving when the error 
occurred. The READKB mnemonic causes the 
problem program to wait for completion of 
the operation before control is regained. 

If an error (data transfer error) occurs 
while processing in the journal tape mode, 
the CNTRL macro instruction used with the 
MARK code can provide a program-controlled 
means of marking lines resulting in actual 
or suspected errors. To ensure that the 
proper line is marked, the user must issue 
the CNTRL macro in his COREXIT routine. If 
the CNTRL macro is issued at any other 
time, the line following the line in error 
will be marked. 

When processing in the document mode, 
the CNTRL macro may be used with the EJD 
mnemonic to eject each document. The EJD 
mnemonic ejects the current document and 
feeds the next document. The CNTRL macro 
with the SSD mnemonic may be used to 
perform the stacker selection function. 
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It is possible to combine the ejection 
and selection functions by using the ESD 
mnemonic. In such cases, the combined 
mnemonic must not be immediately preceded 
by an eject command or immediately followed 
by a stacker select command. 

A selection number of 1, 2, or 3 will 
direct the document to stacker A, B, or R 
(reject) , respectively. It is also 
possible to select stacker A and B in an 
alternate stacking mode. In this mode, 
stacker switching is automatically 
initiated when one stacker becomes full. 
The selection number for alternate stacking 
is 4. Stacker A fills first when selection 
number 4 is used in the first stacker 
selection macro. If selection number 4 is 
used subseguently to other selection 
numbers, the selection number immediately 
preceding number 4 determines the stacker* 
Ejection and selection of documents must 
occur alternately. 

For documents with a scannable length 
greater than 6 inches, the INC mnemonic 
effects document incrementation, which is 
forward document movement of 3 inches. It 
may be used only once for each document. 

Notes ; 

Document ejection and/or stacker selection 
and document increment functions can also 
be accomplished by including the 
appropriate CCW(s) within the channel 
command word list addressed by the READ 
macro rather than by using the CNTRL macro. 
This technigue results in increased 
document throughput. 

The stacker select command must follow the 
eject command within 270 milliseconds if 
the document was incremented or within 295 
milliseconds if the document was not 
incremented. If timing reguirements are 
not met, a late stacker selection condition 
occurs (see COREXIT routine) . 

STR Devices 

The CNTRL macro for STR devices is 
described under P roc es sing with STR 
Devices; CNTRL Macr o* 

BSC Supp ort 

The CNTRL macro for BSC support is 

described under B inary Synchronous 

Commun icatio n; C NTRL Ma cro. 

CHNG Macro 



i — r* 

|Name | 


Op I 


Operand 


i 

1 


1 h 

1 1 

i i_ 


I__ 

CHNG | 

- -- . • 


SYSnnn 


1 

1 



A system may have one or more 2-channel, 
simultaneous read-while-write tape control 
units, which must be connected to selector 
channels 1 and 2 (special feature) . When 
it does, the programmer should assign all 
tape input files for a job to one channel, 
and all tape output files to the other 
channel. This utilizes the maximum 
reading-while- writing capability of such a 
system. During the job, however, the 
program may reguire that a particular tape 
unit be switched from one channel to the 
other. For example, an output file of 
records may be completed during one phase 
of the job, and then be needed as input to 
a subseguent phase. Conversely, after the 
records from an input file have been 
processed, that same file may become an 
output file to write changed, or different 
records. 

The CHNG (change) macro instruction can 
be used to switch a tape unit from one 
selector channel to the other (from input 
to output status, or vice versa) . The 
symbolic unit, specified in the DTFSR entry 
DEVADDR and named in the Job Control ASSGN 
card, is the only parameter required in 
this instruction. The CHNG macro merely 
switches channel assignments; it does not 
change the symbolic reference to the unit. 
This macro may be used in conjunction with 
either logical or physical IOCS 
instructions. 

This macro instruction must not ■ be 
issued while the file(s) associated with 
the symbolic unit is open. 

PRTOV Macro 

i 1 1 1 1 

| Name | Op | Operand | 

I 1 1 — I 

| | PRTOV| filename, n, routine-name | 
i i i i 

The PRTOV (printer overflow) macro 
instruction is used in conjunction with a 
logical file in a printer to specify the 
operation to be performed on a carriage 
overflow condition. Whenever this macro 
instruction is to be issued in a problem 
program, the DTFSR entry PRINTOV must be 
included in the file definition. 

PRTOV reguires two or three parameters. 
The first parameter must be the name of the 
logical file specified in the DTFSR header 
entry. The second parameter must specify 
the number of the carriage tape channel (9 
or 12) used to indicate the overflow. This 
is entered as immediate data 9 or 12. The 
channel 9 or 12 overflow signal is turned 
on by any PUT macro instruction that causes 
printing on the overflow line, or by a 
CNTRL SP macro instruction that causes 
spacing over the overflow line of the form. 
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When the first two parameters are specified 
and an overflow condition occurs, IOCS 
restores the printer carriage to the first 
printing line on the form (Channel 1) , and 
printing of detail lines continues. 



A third parameter is entered in this 
instruction if the programmer prefers to 
branch to his own routine on an overflow 
condition, rather than skipping directly to 
channel 1 and continuing with the detail 
printing.. It specifies the symbolic name 
of the user's routine. In this case, IOCS 
does not restore the carriage to channel 1. 



In his routine, the user may issue any 
IOCS macro instructions (except PRTOV) to 
perform whatever functions he desires. For 
example, this allows him to print total 
lines, skip to channel 1, and print 
overflow page headings. At the end of his 
routine, the user must return to IOCS by 
branching to the address in register 14. 
IOCS supplies this address upon entry to 
the user's routine. Therefore, if IOCS 
macros are used in the routine, the address 
must be saved. 



If the user reguires register 15 in his 
routine, he must also save this register 
and restore it prior to returning to his 
main program. 



The PETOV macro instruction may be 
issued anywhere in the problem program. 
The macro causes a skip to channel 1 , or a 
branch to the user's routine, only if an 
overflow condition (a punch in carriage 
channel 9 or 12) was previously detected as 
a line was printed. (An overflow punch is 
not recognized during a carriage skip 
operation.) An overflow condition that is 
detected as any line is printed (PUT) is 
recognized by the PRTOV macro after the 
follow ing line is printed. For example in 
the following program steps, if a channel 
12 punch was read as line X was printed, 
PRTOV causes a skip to channel 1 after l ine 
X+1 is printed. 



Thus, one extra line is always printed 
after the overflow punch (9 or 12) is 
detected and before the overflow functions 
can occur. Therefore, in planning a 
printer operation, the overflow punch must 
coincide with next-to-the-last line to be 
printed on the form. 



PUT FILEA -for Line X 

Process 

PRTOV FILEA, 12 

Process 



PUT FILEA -for Line X+1 

Process 

• 

PRTOV FILEA, 12 Skips to channel 1 if 

overflow punch was 
detected as Line X was 
printed 

• 

Process 



PUT FILEA -for Line X+2 

IOCS causes Line X+2 to be printed on 
the first line of the following page 
whenever PRTOV specifies only the first two 
parameters. If a user's routine is 
specified, however, the functions performed 
in that routine affect the positioning of 
the form and thus determine where IOCS will 
print Line X+2 when the following PUT is 
executed. 

The channel 9 or 12 overflow signal is 
turned off after the PRTOV macro has been 
executed, or when a CNTRL macro instruction 
is issued to cause skipping to the first 
printing line on the form (channel 1). 

If a channel 9 punch is used in the 
carriage tape, the PRTOV macro must reguest 
posting of device end in the Command 
Control Block (CCB) or a physical IOCS 
error message will result. 



PROCESSING DISK RECORDS BY THE DIRECT 
ACCESS METHOD 

Disk records can be processed in a random 
order by the Direct Access Method (DAM) . 
In this method the user specifies the 
address of the record to IOCS, and issues a 
READ or WRITE macro instruction to transfer 
the specified record. Variations in the 
parameters of the READ or WRITE 
instructions permit records to be read, 
written, updated, replaced, or added to a 
file. Whenever this method of processing 
records is used, the logical file and 
main-storage area (s) allotted to the file 
must be defined by the declarative macro 
DTFDA (Define the File for Direct Access) . 
The detail parameter entries for this 
definition are described under Fil e 
Definition Macros. 
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Rec ord Type s 

Records on disk that will be processed by 
DAM can have either of two formats: with a 
key area, or without. 

With key area 



| Count | 



| Key | | Data | 
i 1 i 1 



Without key area 



| Count 



| Data | 
i i 



Whenever records in a file have keys 
that are to be processed: 

• Every record must have a key, 

• All keys must be the same length, and 

• The length of the keys must be 
specified in the DTFDA entry KEYLEN 
(maximum length is 255 bytes) . 

Whenever the DTFDA entry KEYLEN is not 

specified for a file, IOCS ignores keys and 

the disk records may, or may not, contain 
key areas. 



IOCS considers all reco 
(one logical record per on 
record) . If the user want 
records, he must provide h 
and deblocking. Records a 
considered to be either fi 
undefined. ( Undefin ed inc 
variable-length records.) 
records in the file must b 
the DTFDA entry RECFORM. 
specified as undefined are 
added, or written in a f il 
determine the length of ea 
and load it in a register 
DTFDA entry RECSIZE) befor 
WRITE instruction for that 
adds the length of the key 

Storage Areas 



rds as unblocked 

e physical 

s blocked 

is own blocking 

re also 

xed length or 

ludes 

The type of 
e specified in 
Whenever records 

to be loaded, 
e, the user must 
ch data record 
(specified by the 
e he issues the 

record. IOCS 

when reguired. 



Records in one logical file are transferred 
to or from one I/O area in main storage. 
This area must be large enough to contain 
the largest record in the file. If 
disk-record key areas are to be transferred 



by a READ/WRITE in 
must also provide 
of the key (specif 
Furthermore, if a 
if records are to 
main-storage I/O a 
eight-byte count a 
reguirements are i 
in Figure 15 and d 
DTFDA entry IOAREA 

Reference Methods 



struction, the I/O area 
space for the the length 
ied in DTFDA KEYLEN) . 
file is to be created or 
be added to a file, the 
rea must include an 
rea. The I/O area 
llustrated schematically 
escribed in detail in the 
1. 



With the direct access method of 
processing, each record that is to be read 
or written is specified by providing IOCS 
with two references: 

• Track reference. This gives the track 
on which the desired record is located. 

• Record reference. This may be either . 
the record key (if the records contain 
key areas) or the record identifier 
(ID) . 



IOCS seeks th 
for the indiv 
record to be 
by the macro 
record is not 
no-record-f ou 
error/status 
the DTFDA ent 
can be tested 
additional pr 
suit the user 



e specified 
idual recor 
read or wri 
instr uction 

found, IOC 
nd indicati 
field, whic 
ry ERRBYTE. 

by the pro 
ocessing ca 
' s reguirem 



track, se 
d, and cau 
tten, as i 
If a sp 
S sets a 
on in the 
h is speci 
This ind 
blem progr 
n be progr 
ents. 



arches it 
ses the 
nd icated 
ecif ied 

user 1 s 
fied by 
ication 
am, and 
ammed to 



Multiple tracks can be searched for a 
record specified by key, if the DTFDA entry 
SRCHM is included in the file definition. 
In this case, if the record is not found 
after an entire cylinder is searched, the 
end-of-cylinder bit (instead of the 
no-record-found bit) is set on in the 
error/status field. 



When the 
control is 
problem pro 
program is 
record, or 
record for 
made to ens 
of data is 
issuing a W 
problem pro 



I/O operation i 
returned immedia 
gram. Therefore 
ready to process 
build the succee 
the same file, a 
ure that the pre 
complete. This 
AITF macro instr 
gram. 



s started, 
tely to the 

when the 

the input 
ding output 

test must be 
vious transfer 
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uction in the 
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CREATE A FILE OR ADD RECORDS TO A FILE: RECORDS WITH KEY AREAS 



Length • 
(Bytes) 



Count 


Key 


Data 






BLKSIZE=n *■ 




KEYLEN=n 


Largest Record 



IOAREA1 



CREATE A FILE OR ADD RECORDS TO A FILE: RECORDS WITHOUT KEY AREAS 



Length 
(Bytes) 




IOAREA1 



Length 
(Bytes) 



READ OR WRITE (UPDATE) BY KEY, OR BY ID WITHOUT DTFDA KEYLEN 




READ OR WRITE (UPDATE) BY ID WITH DTFDA KEYLEN 



Length 
(Bytes) 




Length • 
(Bytes) 



READ OR WRITE (UPDATE) BY KEY AND BY ID WITH DTFDA KEYLEN* 





(Unused)* 


Data 


Key 


j or 

Data 




: BLKSIZE=n »- 


KEYLEN=n 
f 


Largest Record 





IOAREA1 



* DTFDA specifies READKEY (or WRITEKY), READID (or WRITEID), 
and KEYLEN for a file. The first n bytes are unused when 
a READ (or WRITE) by key is executed. 



Figure 15. Schematic of I/O Area in Main Storage, for DAM 
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Bytes- 



May 

Contain—*-! 



Pack 


Cell 


Cylinder 


Head 




Number 
(M) 


(BB) 


(CC) 


(HH) 




0 


1 j 2 


3 j 4 


5 ! 6 




i 

i 

0-254 

i 
i 

i 

i . 


0 1 0 
! 


0 j 0-202 

! 


0 i 0-9 j C 
i ; 
i ; 



Record 



0-255 



Address 
Specified by 
SEEKADR=Name 



Required 
for Record 
Reference 
by ID 



Figure 16. Track Reference Field 



After a READ or W 
specified record has 
can make the ID of t 
available to the pro 
record reference is 
tracks are searched, 
specified record (ra 
record) is supplied, 
supplying the ID is 
updating operation o 
successive disk reco 
processing consecuti 
the next ID and does 
end-of-file record, 
supplied by IOCS aga 
determine when he ha 
his logical file. T 
supply the ID, the u 
5-byte field (in whi 
ID) and specify the 
this field in the DT 



RITE instruction for a 

been executed, IOCS 
he next record 
blem program.- When 
by key and multiple 

the ID of the 
ther than the next 

The function of 
useful for a random 
r for the processing of 
rds. If the user is 
vely on the basis of 

not have an 
he can check the ID 
inst his file limits to 
s reached the end of 
o request that IOCS 
ser must set up a 
ch IOCS can store the 
symbolic address of 
FDA entry IDLOC. 



Tra ck Reference : To provide IOCS with the 
track reference, the user sets up an 8-byte 
track- reference field in main storage , 
assigns a symbolic name, and specifies the 
symbolic name in the DTFDA entry SEEKADR. 
Before issuing any read or write 
instruction for a record, the user must 
store the proper track information 
(MBBCCHH) in the first seven bytes of this 
field. The field (Figure 16) contains the 
following seven bytes for track reference. 
The eighth byte (R) , listed here and shown 
in the figure, is used when reference to 
records is by record number (see Record 
Referencei Ide nti fier) . All numbers must 



be supplied in binary notation. 



Con- 

By te Ident . tents 
0 M 0-25 4 



1-2 B,B 



0,0 



3-4 C,C 



0,0-202 



Information 

Number of the pack 
(0-254) on which the 
record is located. 
All packs for a file 
must be numbered 
consecutively starting 
with 0. That is, the 
first pack must be 
number 0, the second 
pack number 1, etc. 
This number relates to 
a numbered symbolic 
unit (SYS000-SYS254) . 
Two or more symbolic 
units for a file must 
be numbered 

consecutively, but the 
numbering may start 
with any SYSnnn 
number. 



Reserved for cell 
number, which relates 
to the IBM 2321 Data 
Cell Drive. These two 
bytes are always zero 
for 2311 disk-storage 
references. 

Number of the cylinder 
(0-202) in which the 
record is located. 
The first byte is 
always zero, and the 
second byte specifies 
one of the 203 
cylinders in a disk 
pack. These two bytes 
with the next two 
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(HH) provide the track 
identif ic ation. 

5-6 H,H 0,0-9 Number of the 

read/write head (0-9) 
that applies to the 
record. The .first 
byte is always zero, 
and the second byte 
specifies one of the 
ten disk surfaces in a 
disk pack. 

7 R 0-255 Sequential number of 

the record on the 
track . 

When the READ or WRITE is executed, IOCS 
refers to this field to select the specific 
track on the appropriate disk pack. 

Record Reference ; The Direct Access Method 
allows records to be specified by record 
key or by record identifier. 



1 If records contain key areas, the 
records on a particular track can be 
randomly searched by their key numbers. 
This allows the user to refer to 
records by the logical control 
information associated with the 
records, such as an employee number, a 
part number, a customer number, etc. 

For this type of reference the 
programmer must specify, in the DTFDA 
entry KEYARG, the symbolic name of a 
main-storage key field. He then stores 
each desired key in this field. 



Ide ntifier (I D} : Records on a particular 

track can be randomly searched by their 
position on the track, rather than by 
control information. This is 
accomplished by using the record 
identifier (ID). The record 
identifier, which is part of the count 
area of any 2311 disk record, consists 
of five bytes (CCHHR) . The first four 
bytes (cylinder and head) refer to the 
location of the track, and the fifth 
byte (record) uniquely identifies the 
particular record on the track. When 
records are specified by ID, they must 
be numbered in succession, and without 
missing numbers, on each track. The 
first data record on a track must be 
record number 1, the second number 2, 
etc. 

Whenever records are to be 
identified by the record ID method, the 
eighth byte (R) of the track-reference 



field (Figure 16) must con 
number of the desired reco 
READ or WRITE instruction 
by ID is executed, IOCS re 
track-reference field to d 
which record is requested 
program. The number in th 
compared with the correspo 
in the count areas of the 
The R byte specifies the p 
record on the track. 
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rd. When a 
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is field is 

nding fields 

disk records. 

articular 



Creating a File or Adding Records to a Fil e 



In addition to rea 
updating records r 
access method perm 
file or add record 
is done, all three 
are written: the 
(if present) , and 
record may be writ 
written on a speci 
done by using the 
the parameter AFTE 
track is erased. 



ding, writing, and 
andomly, the direct 
its the user to create a 
s to a file. When this 
areas of a disk record 
count area, the key area 
the data area. The new 
ten after the last record 
fic track. This may be 
WRITE instruction with 
R. The remainder of the 



When records are to be adde 
file by the AFTER method (spec 
DTFDA AFTER=YES) , IOCS ensures 
record will fit on the track s 
it. If the record will fit, I 
the record; if it will not fit 
no^-room-f ound indication in th 
error/status field (specified 
entry ERRBYTE) . In the AFTER 
determines the location where 
to be written. 



d to a disk 
ified by 

that each 
pecified for 
OCS writes 
, IOCS sets a 
e user's 
by the DTFDA 
method IOCS 
the record is 



For this, IOCS uses the first record on 
each track (R0) to maintain updated 
information about the data records on the 
track. Record 0 (Figure 17) has a Count 
area and a data area, and contains the 
following : 

Count Area 

Flag (not normally transferred to main 
storage ) 

Identifier 

Key Length (KL) 

Data Length (DL) 

Data Area (8 bytes) 

5 Bytes - ID of last record written on 

track (CCHHR) . 
2 Bytes - Number of unused bytes 

remaining on track. 
1 Byte - (Unused) 

Each time WRITE AFTER is executed, IOCS 
updates the data area of this record. 
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Figure 17. Contents of Record 0 



READ Macro 



1 " ' T 

|Name ] 


Op 
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Operand | 


1 h 

1 1 
1 1 

1 L 


1 

READ | 
READ 


1 , 

filename, KEY | 
filename, ID j 

i 



This instruction causes a record to be 
transferred from disk storage to an input 
area in main storage . The input area must 
be specified in the DTFDA entry I0AREA1. 

The READ macro instruction is written in 
either of two forms, depending on the type 
of reference used to search for the record. 
Both forms may be used for records in any 
one DTFDA-specif ied logical file if the 
logical file has keys. 

The instruction always reguires two 
parameters. The fir st paramet er specifies 
the symbolic name of the file from which 
the record is to be retrieved. This name 
is the same as that specified in the DTFDA 
header entry for this file. The sec ond 
paramet er specifies the type of reference 
used for searching the records in the file. 

Record Referen ce by Key 

If the record reference is by key (control 
information in the key area of the disk 
record), the second parameter in the READ 
instruction must be the word KEY, and the 
DTFDA entry READKEY must be included in the 
file definition. 

Whenever this method of reference is 
used, the problem program must supply the 
key of the desired record to IOCS before 
the READ instruction is issued. For this, 
the key must be stored in the key field 
(specified in the DTFDA entry KEYARG) . 



When the READ instruction is executed, IOCS 
searches the previously specified track 
(stored in the 8-byte track-reference 
field) for the desired key. 

Then when a disk record containing the 
specified key is found, the data - area of 
the record is transferred to the 
main-storage input area. 

Only the specified track is searched 
unless the programmer reguests that 
multiple tracks be searched on each READ 
instruction. A search of multiple tracks 
is specified by including the DTFDA entry 
SRCHM in the file definition. With this 
entry, the specified track and all 
following tracks are searched until the 
desired record is found or the end of the 
cylinder is reached. The search of 
multiple tracks continues through the 
cylinder even though part of the cylinder 
may be assigned to a different logical 
file. 



Record Referen ce by ___ID 

If the record reference is by ID 
(identifier in the count area of records) , 
the second parameter in the READ 
instruction must be the letters ID, and the 
DTFDA entry READ ID must be included in the 
file definition. 

Whenever this method of reference is 
used, the problem program must supply both 
the track information and the record number 
in the 8-byte track-reference field. When 
the READ instruction is executed, IOCS 
searches the specified track for the 
particular record. When a disk record 
containing the specified ID is found, both 
the key are a (if present and specified in 
DTFDA KEYLEN) and the data area of the 
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record are transferred to the main-storage 
in pat area. 

WRITE Macro 





1 


|Name | Op | 
J 1 -+■ 


Operand | 


| | WRITE) 


filename, KEY | 


| | WRITE | 


filename, ID | 


| | WRITE | 


filename, RZERO | 


| | WRITE| 


filename, AFTER j 

i 



This instruction, except in the case of 
RZERO, causes a record, which has been 
built in an output area of main storage, to 
be transferred from main storage to disk 
storage. The output area must be specified 
in the DTFDA entry I0AREA1 . 

The WRITE macro instruction is written 
in one of four forms, depending on the type 
of reference that is used to search for the 
record location in the file. All forms may 
be used for records in any one 
DTFDA-specif ied logical file if the logical 
file has keys. 

The instruction always reguires two 
parameters. The first parameter specifies 
the name of the file to which the record is 
to be transferred. This name is the same 
as the one specified in the DTFDA header 
entry for this file. The second, parameter 
specifies the type of reference that is 
used for searching the records on disk to 
find the proper location to write the 
output record. 

Record R eference by Key 

If the disk-storage location for writing 
records is determined by the record key 
(control information in the key area of the 
disk record) , the work KEY is entered as 
the second parameter of the WRITE 
instruction. Also the DTFDA entry WRITEKY 
must be included in the file definition. 

Whenever this method of reference is 
used, the problem program must supply the 
key of the desired record to IOCS before 
the WRITE instruction is issued. For this, 
the key must be stored in the key field 
(specified by the DTFDA entry KEYARG) . 
When the WRITE instruction is executed, 
IOCS searches the previously specified 
track (stored in the 8-byte track* reference 
field) for the desired key. Then, when a 
disk record containing the specified key is 
found, the data in the main-storage output 
area is transferred to the data a rea of the 
disk record. This replaces the information 
previously recorded in the data area. IOCS 
uses the count field of the original record 
to control the writing of the new record. 
If a record is shorter than the original 



record, it is padded with zeros. A record 
longer than the original record is written 
only to the extent of the area indicated in 
the count field on the track, and any 
excess bytes are lost. In either case 
(short or long records) IOCS turns on the 
wrong-length-record bit in the error/status 
field . 

Only the specified track is searched 
unless the programmer reguests that 
multiple tracks be searched on each WRITE 
instruction. Searching multiple tracks is 
specified by including the DTFDA entry 
SRCHM in the file definition. In this 
case* the specified track and all following 
tracks are searched until the desired 
record is found or the end of the cylinder 
is reached. The search of multiple tracks 
continues through the cylinder even though 
part of the cylinder may be assigned to a 
different logical file. 

Record Reference by - ID 

If the disk-storage location for writing 
records is determined by the record ID 
(identifier in the count area of records) , 
the letters ID are entered as the second 
parameter of the WRITE instruction. Also 
the DTFDA entry WRITEID must be included in 
the file definition. 

Whenever this method of reference is 
used, the problem program must supply both 
the track information and the record number 
in the 8-byte track-reference field. When 
the WRITE instruction is executed, IOCS 
searches the specified track for the 
particular record. When the disk record 
containing the specified ID is found, the 
information in the main-storage output area 
is transferred to the key area - (if present 
and specified in DTFDA KEYLEN) and the data 
area of the disk record. This replaces the 
key and data previously recorded, IOCS uses 
the count field of the original record to 
control the writing of the new record. If 
a record is shorter than the original 
record, it is padded with zeros. A record 
longer than the original record is written 
only to the extent of the area indicated in 
the count field on the track, and any 
excess bytes are lost. In either case 
(short or long records) IOCS turns on the 
wrong-length-record bit in the error/status 
field. 

Record Reference: Record Zero 

If record zero (RO) is to be written, the 
second parameter of the WRITE instruction 
must be the specification RZERO. Also the 
DTFDA entry AFTER must be included in the 
file definition. 

This reference should be used each time 
the problem program reuses a certain 
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portion of a disk pack. It may be used as 
a utility function to initialize a limited 
number of tracks or cylinders. Only one 
track at a time, however, may be 
initialized. This is done by issuing a 
WRITE RZERO instruction with the address of 
each track to be initialized. 

Whenever this method of reference is 
used, the problem program must supply the 
track information (cylinder and track 
number) in the 8-byte track-reference 
field. Any record number is valid but will 
be ignored. When WRITE is executed, IOCS 
writes a new RO with the maximum capacity 
of the track (3625 characters) and erases 
the full track after RO. 

Aft er 

If a record is to be written following the 
last record previously written on a disk 
track (regardless of its key or ID) , the 
second parameter of the WRITE instruction 
must be the specification AFTER. For this 
operation the DTFDA entry AFTER must be 
included in the file definition. 

Whenever this method of reference is 
used for writing records, the problem 
program must supply the track information 
in the first seven bytes of the 8-byte 
track- re fere nee field. When WRITE is 
executed, IOCS examines the capacity record 
(Record 0) on the specified track to 
determine the location and amount of space 
available for the record. If the remaining 
space is large enough, the information in 
the main storage output area is transferred 
to the disk track in the location 
immediately following the last record. The 
count area , the key area (if present and 
specified by DTFDA KEYLEN) , and the data 
area are written. IOCS then updates the 
capacity record. 

If the space remaining on the track is 
not large enough for the record, IOCS does 
not write the record and, instead, sets a 
no-room-found indication in the user's 
error/status field (specified by the DTFDA 
entry ERRBYTE) . 

Whenever this instruction will be used 
in a problem program, it is the user's 
responsibility to ensure that the capacity 
record reflects the present condition of 
the file. Therefore, if he is going to 
build a new file in an area of the disk 
pack that contains outdated records, the 
capacity records must first be set up to 
reflect empty tracks. An IBM-supplied 
utility program is available to construct 
Record 0. 

If records in the file are specified as 
undefined (RECFORM=UNDEF) , the programmer 
must determine the length of each record 



and load it in a register for IOCS use, 
before he issues the WRITE instruction for 
that record. The register that will be 
used for this purpose must be specified in 
the DTFDA entry RECSIZE. 

WAITF Macro 
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The WAITF macro instruction is used to 
ensure that the transfer of a record has 
been completed. It reguires only one 
parameter: the symbolic name of the file 
containing the record. 

This instruction must be issued before 
the problem program attempts to process an 
input record or build another output record 
for the file concerned. The program enters 
a waiting loop until the transfer of data 
is complete. Thus, the WAITF macro 
instruction must be issued after any READ 
or WRITE instruction for a file, and before 
the succeeding READ or WRITE instruction 
for the same file. 

The WAITF macro makes error/status 
information, if any, available to the 
problem program in the field specified by 
DTFDA ERRBYTE. 

CNTRL Macro 
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The CNTRL (control) macro instruction is 
used to begin access movement for the next 
READ or WRITE for a file. It reguires two 
parameters. 

The firs t parameter specifies the 
symbolic name of the file, which is the 
same name as that specified in the DTFDA 
header entry for the file. The second 
parameter must be the word SEEK. 

Before issuing the CNTRL macro 
instruction, the user must specify a track 
address to which access movement should 
begin. This address must be stored in the 
track-reference field specified by the 
DTFDA entry SEEKADR. While the 
disk-storage arm is moving, the programmer 
may process data and/or reguest I/O 
operations for files on other devices. 

If the CNTRL macro is not used, IOCS 
performs the seek operation when a READ, 
WRITE, GET, or PUT instruction is executed. 
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PROCESSING DISK RECORDS BY THE INDEXED 
SEQUENTIAL SYSTEM 

The Indexed Sequential Pile Management 
System (ISFMS) permits disk records to be 
processed in random order or in seguential 
order by control information. For random 
processing, the user supplies the key 
(control information) of the desired record 
to ISFMS, and issues a READ or WRITE macro 
instruction to transfer the specified 
record. For seguential processing by 
control information (key) , the user 
specifies the first record to be processed 
and then issues SET or PUT macro 
instructions until all desired seguential 
records have been processed. The 
successive records are made available in 
seguential order by key. Variations in 
macro instructions permit: 

• A logical file of records to be loaded 
onto disk (created) . 

• Individual records to be read from, 
added to, or updated in the file. 

Whenever the indexed seguential system 
of processing is used, the logical file and 
main-storage areas allotted to the file 
must be defined by the declarative macro 
DTFIS (Define The File for Indexed 
Seguential System). The detail parameter 
entries for this definition are described 
under File Defini t ion Mac ros. 

Record Types 

When an ISFMS file is originally organized, 
it is loaded onto the disk pack(s) from 
pre-sorted input records. These records 
must have been sorted by control 
information. All records in the disk file 
must contain key areas: 

i 1 i 1 i 1 

| Count | | Key | | Data | 

All keys must be the same length, and the 
length must be specified in the DTFIS entry 
KEYLEN, (maximum length is 95 bytes) . 

The logical records must be fixed 
length, and the length must be specified in 
the DTFIS entry RECSIZE. Logical records 
may be either blocked (two or more logical 
records in one physical record) or 
unblocked (one logical record per one 
physical record) . This must be specified 
in the DTFIS entry RFC FORM. When blocked 
records are specified, the key of the 
highest record (last) in the block is the 
key for the block, and therefore must be 
stored in the key area of the disk record. 

The location of the key withi n each 
logical record must be specified in the 



DTFIS entry KEYLOC. The number of records 
in a block must be specified in the DTFIS 
entry NRECDS. This specification is "1" 
for unblocked records. 

Storage Areas 

Records in one logical file are transferred 
to, or from, one or more I/O areas in main 
storage . The areas must always be large 
enough to contain the key area and a block 
of records, or a single record if unblocked 
records are specified. In addition, it 
must allow space for the count area when a 
file is to be loaded, or when records are 
to be added to a file. For the functions 
of adding or retrieving records, the I/O 
area must also provide space for a seguence 
link field that is used in conjunction with 
overflow records (see Addition of Records, 
and Ov erflow Areas ) . The I/O area 
reguirements are illustrated schematically 
in Figure 18 and described in detail in 
DTFIS entries IOAREAL, IOAREAR, and 
IOAREAS. 

Records may be retrieved and processed 
directly in the I/O area or in a work area. 
If the records are to be processed in the 
I/O area, a register must be specified in 
the DTFIS entry IOREG. This is used to 
point to the beginning of the data portion 
of each record and thus locate the record 
for processing. Note: For seguential 
unblocked records, the key is at the 
beginning of the I/O area. 

If the records are to be processed in a 
work area, the DTFIS entry WORKL, WORKR, or 
WORKS must be specified- ISFMS moves each 
individual input record from the I/O area 
to the work area where it is available to 
the problem program for processing. 
Similarly, on output, ISFMS moves the 
completed record from the work area to the 
I/O area where it is available for transfer 
to disk storage. Whenever a work area is 
used, a register is not reguired. 

Organization of R ecords on Disk 

When a logical file of presorted records is 
loaded onto disk, ISFMS organizes the file 
in a way that allows the user access to any 
record, in the most efficient manner. 

Reference can be made to records at 
random throughout the logical file, or to a 
series of records in the file in their 
presorted seguence (collating seguence) . 
The organization also provides for 
additions to the file at a later time, 
while still maintaining both the random and 
seguential reference capabilities. 

ISFMS loads the records, one after the 
other, into a specified area of the disk 
pack. This is called the prim e area of the 
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logical file on disk. The starting and 
ending limits of this area are specified by 
the user in Job Control XTENT cards. The 
prime data area must start cn the first 
track (track 0) of a cylinder (other than 
0) , and it must end on the last track 
(track 9) of the same or a different 
cylinder. Prime data extents cannot start 
or end in the middle of a cylinder. 
Whenever the prime area extends into two or 
more disk packs, it must be continuous from 
one pack to the next and may not be 
interrupted. In this case, an XTENT card 
is reguired to define each area of each 
disk pack on which the prime area is 
located. For example, if the prime area 
extends over three disk packs, three XTENT 
cards are reguired, one for each disk pack. 

Whenever any type of processing is being 
done for an Indexed Seguential file, all 
packs in a multipack file must be on-line. 



Indices 

As ISFMS loads a file of records sorted by 
control information, it builds a set of 
indices for the file. The indices are 
utilized for both random and seguential 
reference to records as follows: 

• They permit rapid access to individual 
records for random processing. 



They supply the means of providing 
records in key order during seguential 
processing. 



Either two or three indices are built, 
depending on the user's specifications. 
Both a track index and a cy linder - inde > are 
always constructed. A master inde x is also 
constructed if the DTFIS entry MSTIND is 
included in the file definition. 

Once a file has been loaded and the 
related indices have been built, the ISFMS 
routines search for specified records by 
referring to the indices. When a 
particular record (specified by key) is 
reguested for processing, ISFMS searches 
the master index (if used) , then the 
cylinder index, then the track index, and 
finally the individual track. Each index 
narrows the search by pointing to the 
portion of the next-lower index whose range 
includes the specified key. Because of the 
high speed and efficiency of the direct 
access devices in a System/360, a master 
index should be established only for 
exceptionally large files, for which the 
cylinder index occupies several tracks 
(possibly four or more) . That is, it is 
generally faster to search only the 
cylinder index (followed by the track 
index) when the cylinder index occupies 
less than four tracks. 
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Figure 18. Schematic of I/O Areas in Main Storage, for ISFMS 
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The indices are made up of a series of 
entries, each of which includes the address 
of a disk track and the highest key on that 
track, or cylinder. Each entry is a 
separate disk record composed of both a key 
area and a data area. The key area 
contains the highest key on the track or 
cylinder, and its length is the same as 
that specified for logical data records (in 
the DTFIS entry KEYLEN) . The data area of 
each index is ten bytes long, and it 
contains track information including the 
track address. 
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dex : . The track index is the lowest 
dex for the logical file. A 
track index is built for each 
used by the file, and it contains 
tries for that cylinder only* Each 
dex is located on the cylinder that 
dexing. It is always on the first 
that cylinder. Track indices are 
ed part of the prime data area 
d by a Job Control XTENT card. 



When the track indices are originally 
constructed, they contain two entries 
(normal and overflow) for each track 
utilized on the cylinder. For example, if 
the prime area of the logical file utilizes 
eight tracks on a cylinder, the track index 
might contain the entries shown in Figure 
19. The use of two index records for each 
track is reguired because of overflow 
records that will occur if more records are 
inserted in the file at a later time (see 
Addi tion of Re c ords, a nd Overflow Areas ) . 
When overflow records for a track exist, 
the second (overflow) index record contains 



the key of the highest record in the 
overflow chain for this track and the 
address of the lowest record in the 
overflow chain. The dummy entry indicates 
the end of the track index. Any following 
records are logical- file data records. 
The COCR entry is required whenever a 
cylinder overflow area is specified (see 
Example of an Organ i zed File ) . 
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The cylinder index may be located on one 
or more successive cylinders. Whenever the 
index is continued from one cylinder to 
another, the last index entry on the first 
cylinder contains a linkage field that 
points to the first track of the next 
cylinder. A cylinder index may not be 
continued from one pack to another, 
however. It must be completely contained, 
within one disk pack. 



This index co 
cylinder occupie 
key area contain 
associated with 
area contains th 
index for that c 
file* requires ni 
index might cont 
Figure 20. The 
end of the cylin 



ntains one ent 
d by the data 
s the highest 
the cylin der, 
e address of t 
ylinder. For 
ne cylinders, 
ain the entrie 
dum m y entr y in 
der index. 



ry for each 
file. The 
key 

and the data 
he track 
example if a 
the cylinder 
s shown in 
dicates the 



Macro Instruction Statements 99 



TRACK INDEX 



COCR 



Key 
75 





D 


K 


Key 




Track 2 


240 




Address 



Track 0 
Address 



Key 
75 



Track 0 
Address 



Key 
240 



Track 2 
Address 



Key 
150 



Track 1 
Address 



Key 




980 





Track 7 
Address 



Key 
150 



Key 
980 



Track 1 
Address 



Track 7 
Address 



All 




1 -Bits 





K D 
Dummy Entry 



K = Key Area 
D = Data Area 

COCR = Cylinder Overflow Control Record (R0) 

Figure 19. Schematic Example of a Track Index 
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Figure 20. Schematic Example of a Cylinder Index 
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MASTER INDEX 



Key 




Track X + 1 




Key 


4730 




Address 




8560 


K 


D 


K 



All 




1-BHs 





Track X + 2 
Address 



Key 
12750 



Track X + 3 
Address 



Key 




85610 




K 



Track X + 20 
Address 



Dummy Entry 



K = Key Area 
D = Data Area 

Figure 21. Schematic Example of a Master Index 



Master Index ; The master index is the 
highest level index for a logical file 
built by the IBM System/360 Basic Operating 
System. This index is optional and it is 
built only if it is specified by the DTFIS 
entry MSTIND. It is built in the location 
specified by a Job Control XTENT card. 
Like the cylinder index, it may be located 
on the same disk pac k with the logical-file 
records or on a different pack that will be 
on-line whenever the records are processed. 

The master index mu st immediately 
precede the cylinder index on a disk pack, 
and it may be located on one or more 
successive cylinders. Whenever it is 
continued from one cylinder to another, the 
last index entry on the first cylinder 
contains a linkage field that points to the 
first track of the next cylinder. A master 
index may not be continued from one pack to 
another, however. It must be completely 
contained within one disk pack. 

The master index contains an entry for 
each track of the c y l inder index . The key 
area contains the highest key on the 
cylinder-index track, and the data area 
contains the address of that track. For 
example, if a master index is located on 
track X and a cylinder index is located on 
tracks X + 1 through X + 20, the master 
index might contain the entries shown in 
Figure 21. The dummy entry indicates the 
end of the master index. 

Add ition of Records, and Overflow Areas 

Some time after a logical file has been 
organized on disk it may become necessary 
to add records to the file. These records 
may contain keys that are above the highest 
key presently in the file, and thus 



constitute an extension of the file. Or, 
they may contain keys that fall between 
keys already in the file and therefore 
reguire insertion in the proper seguence in 
the organized file. 



If all records to be added have keys 
that are higher than the highest key in the 
organized file, the upper limit of the 
prime area of the file can be adjusted (if 
necessary) by the specification in a Job 
Control XTENT card. Then the new records, 
which must be presorted, can be added by 
loading them into the file. No overflow 
area is reguired. The file is merely 
extended further on the disk pack. 

If records must be inserted among those 
already organized, however, an overflo w 
area will be reguired. The ISFMS system 
uses the overflow area to permit the 
insertion of records without necessitating 
a complete reorganization of the 
established file. The fast random and 
seguential retrieval of records is 
maintained by inserting references to the 
overflow area in the track indices, and by 
using a chaining technigue in the overflow 
records. For chaining, a seguence-link 
field is prefixed to the user's data record 
in the overflow area. The seguence-link 
field contains the address of the record in 
the overflow area that has the next-higher 
key. Thus a chain of seguential records 
can be followed in a search for a 
particular record. The seguence-link field 
of the highest record in the chain 
indicates the end of the chain. All 
records in the overflow area are unblocked, 
regardless of the specification (in DTFIS 
RECFORM) for the data records in the 
logical file. 
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DATA RECORDS 



Figure 22. Example of Data Records, as Originally Organized on Tracks 1 and 2 
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To add a record by insertion, ISFMS 
searches the established indices first to 
determine on which t rack the record must be 
inserted. The keys of the last records on 
the tracks in the originally organiz ed file 
determine the track where an inserted 
record belongs. A record is always 
inserted on the track where: 



1. The last key is higher than the 
insertion, and 

2. The last key of the preceding track is 
lower than the insertion. 



ISFMS also updates the track index 
to reflect this change. The first 
index record for the track has the key 
field changed to indicate the new 
last-record located on the track. The 
s econd index recor d for the track has 
the track address (in the data area) 
changed to point to the address of the 
overflow record. If a record with key 
105 is added to a file organized as 
shown in the previous illustrations and 
if the overflow area is located on 
Track 8 r the track index records 
contain the information shown in Figure 
23. 



For example, assume Tracks 1 a 
organized with the record keys 
Figure 22. Then records with 
151, 175, 199, 215, and 239 ar 
Track 2 (or in the related ove 
that has developed) . Any key 
150 is added to either Track 0 
any key higher than 240 belong 
or above. The track indices a 
the highest key of each track 
originally organized. 



nd 2 are 
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e inserted on 
rflow chain 
lower than 

or Track 1; 
s to Track 3 
lways retain 
as it was 



After the proper track is determined, 
ISFMS searches the individual records on 
the track or overflow area (if necessary) 
to find where the record belongs in key 
order. This results in either of two 
conditions: 

1. The record falls between two records 

presently on the track. ISFMS adds the 
record by inserting it in the proper 
seguence and shifting each succeeding 
record one record location higher cn 
the track, until the end record is 
forced off the track. ISFMS transfers 
the end record to the overflow area, 
and prefixes the record (data area) 
with a seguence-link field. The first 
time a record is inserted on a track, 
the seguence link of the overflow 
record indicates that this is the 
highest record associated with the 
track. Thereafter, the sequence-link 
field of each overflow record points to 
the next-higher record for that track. 



INDEX ENTRIES FOR ONE TRACK 
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Figure 23. 



Example of Track Index Entries 
Before and After Addition of a 
Record on Track 1 



2. The record falls between the last 

record presently on the track and the 
last record originally on the track. 
Thus, it belongs in the overflow area. 
ISFMS writes the record in the overflow 
area following the last record 
previously written. ISFMS searches 
through the chain of records associated 
with the corresponding track for this 
record and identifies the sequential 
position the record should take. Then 
the seguence-link fields of the new 
record, and of the record preceding it 
by sequential key, are adjusted to 
point to the proper records. If 
records 150, 140, and 130 are already 
in the overflow area and record 135 is 
to be added, for example, the 
seguence-link fields of records 130 and 
135 must be adjusted (Fiqure 24) . 
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Figure 24. Example of Sequence-Link Fields 
Adjusted for Addition of a 
Record (135) 



Ove rflow-Area Option ; The location of the 
overflow area (s) for a logical file may be 
specified by the user. The overflow areas 
may be built by one of three methods: 

1. Overflow areas for records may be 
located on each cylinder within th e 
prime area that is specified by a Job 
Control XTENT card for the data file. 
In this case the user must specify the 
number of tracks to be reserved for 
overflow on each cylinder occupied by 
the file. The overflow records that 
occur within a particular cylinder are 
written in the c ylinder overflow area 
for that cylinder. 

The number of tracks to be reserved 
for each cylinder overflow area must be 
specified in the DTFIS entry CYLOFL 
when a file of records is to be loaded 
and when records are to be added to an 
organized file. 

2. An i ndependent overflow area may be 
specified for storing all overflow 
records for the logical file. This 
area may be on the same pack with the 
data records, or on a different pack 
that is on-line. However it must be 
contained within one disk pack. A Job 
Control XTENT card must be included 
when the program is executed to specify 
the area of the disk pack to be used 
for this overflow area. This card must 
be the last XTENT card that Job Control 
reads for the file. 

3. Both cylinder overflow areas (method 1) 
and an independent overflow area 
(method 2) may be used. In this case 
overflow records are placed first in 
the cylinder overflow areas within the 
data file. When any cylinder overflow 
area becomes filled, the additional 
overflow records from that cylinder are 
written in the independent overflow 
area. The specifications reguired for 
both methods 1 and 2 must be included 
for this combined method of handling 
overflows. 



Example of an O rgani zed File 

A simplified example of a file organized on 
disk by the Indexed Seguential File 
Management System is shown schematically in 
Figure 25. The assumptions made and the 
items to be noted are: 



1. The track index occupies part of the 
first track, and data records fill the 
rest of the track. 

2. The data records occupy part of Track 
0 and all of Tracks 1-7. Tracks 8 and 
9 are used for overflow records in 
this cylinder. 

3. The master index is located on Track X 
on a different cylinder. The cylinder 
index is located on Tracks X+ 1 through 
X+20. 

4. A dummy entry signals the end of each 
index. 

5. The file was originally organized with 
records as follows: 



Track Records 

0 5-75 

1 100-150 

2 200-240 



1 900-980 

6. The track index originally had two 
entries for each track. It now shows 
that overflow records have occurred 
for Tracks 1 and 7. 

7. Records 150, 140, and 130 were forced 
off the track by insertions on the 
track. Record 135 was added directly 
in the overflow area. 

8. A seguence-link field (SL) has been 
prefixed to each overflow record. The 
records for Track 1 can be searched in 
seguential order by following the SL 
fields: 

Record Sequence-Link field (SL) 

130 SL points to record with key 
135. 

135 SL points to record with key 
140. 

140 SL points to record with key 
150. 

150 End of search. (Key 150 was 
the highest key on Track 1 
when the file was loaded.) 
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Track 
X 



Track 
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CYLINDER INDEX 



Cylinder 1 
Track 0 
Address 



Cylinder 2 
Track 0 
Address 



Cylinder 9 
Track 0 
Address 



9. When the file was loaded, the last 
record on Cylinder 1 was Record 980, 
on Cylinder 2 Record 1850, and on 
Cylinder 9 Record 4730. This is 
reflected in the cylinder index. 

10. When the file was loaded, the last 
entry on track X+ 1 (first track of 
Cylinder Index) was Record 4730, on 
track X+2 Record 8560, on track X+3 
Record 12750, and on track X+20 Record 
856 10. This is reflected in the 
master index. 

11. When cylinder overflow areas are used, 
the first record (Record 0) in the 
track index for a cylinder is the 
Cylinder Overflow Control Record 
(COCR) . It contains the address of 
the last overflow record on the 
cylinder arid the number of tracks 
remaining in the cylinder overflow 
area. When the number of remaining 
tracks is zero, overflow records are 
written in the independent overflow 
area. 



MACRO INSTRUCTIONS TO LOAD OR EXTEND A DISK 
FILE BY ISFMS 

The function of originally loading a file 
of presorted records onto disk and the 
function of extending the file by adding 
new presorted records beyond the previous 
high record are essentially the same. Both 
are considered a LOAD operation (specified 
by the DTFIS entry IOROUT) , and they both 
use the same macro instructions in the 
problem program. 

The areas of the disk packs used for the 
file are specified by Job Control XTENT 
cards. The areas are: the prim e area 
where the data records are written, a 
cylinder index area where the user wants 
ISFMS to build the cylinder index, and a 
master index area if a master index is to 
be built (specified by the DTFIS entry 
MSTIND) . 

During the load operation, ISFMS builds 
the track, cylinder, and master (if 
specified) indices. If either the data 
records, the cylinder index, or the master 
index exceeds the area provided for it, 
ISFMS branches to a user's routine 
(specified by the DTFIS entries DTAREX, 
CYNDEX, and MANDEX, respectively) . If the 
data area has been exceeded, an ENDFL 
instruction may be included in the DTAREX 
routine to prepare the file for closing. 
This permits the remaining records to be 
treated as extensions. To continue 
loading, the user must supply a, new XTENT 
card for the area exceeded and restart the 
job. 



Whenever any type of processing is being 
done for an Indexed Seguential file, all 
packs of a multipack file must be on-line. 

Whenever an organized file is to be 
extended, the identical Job Control DLAB 
card that was originally used when the file 
was loaded must be used again. However, if 
an organized file is to be loaded on the 
same disk pack a second time, the user 
should prepare a new Job Control DLAB card 
to prevent his file from being treated as 
an extension of itself. In the new DLAB 
card, the user must change either the 
filename, creation date, or expiration 
date . 

Name o f First Contr ol Section: Whenever 
the LOAD function is specified, the user 
must place a name in the START card in his 
source deck to define the first control 
section. This permits ISFMS to use an 
ENTRY statement to identify a linkage 
symbol defined in this control section and 
used in subseguent control sections. 
However, the user-written portion of the 
program will not be in the control section 
named by the START card. Instead, it will 
be in a control section named by ISFMS. 
The name assigned by ISFMS is FilenameU. 
Filename is the name of the last file for 
which LOAD is specified, unless seguential 
retrieval is specified for another file in 
the program (see Macro Instructions fo r 
Seguent ial Re trieval by ISFMS) . 

As a result of these conditions, the 
programmer must be sure to use the 
applicable name if he wishes to continue 
his first control section after it has been 
interrupted by a dummy section or a 
different control section. He must use the 
name assigned by ISFMS (rather than the 
START card) whenever LOAD is specified for 
any file in the source program. 



Macro I nstructio ns 

Three different macro instructions are 
always reguired in the problem program to 
load original or extension records into the 
logical file on disk. 

SETFL Macro 



I T — 

| Name 1 Op | 


■ 

| Operand 


_ ... n 
1 


J 1- 

| | SETFL ! 
i .1.. 


I 

| filename 
i 


s 

1 

J 



The SETFL (set file load mode) macro 
instruction causes ISFMS to set up the file 
so that the load function can be performed. 
The symbolic name of the file to be loaded 
is the only parameter reguired in this 
instruction. This name is the same as that 
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specified in the DTFIS header entry for 
this file. 



When a file is being created, TSFMS 
formats the track index, cylinder index, 
and master index (if used) with dummy 
entries. When a file is being extended, 
the SETFL macro simulates a restart 
condition so that the load function can 
proceed as if it were making its initial 
run. 



WRITE Macro 

i r 1 

|Name | Op | Operand 

J — 1- 1 

| | WRITE | filename, NEWKEY, IS 
i i i . 



When a WRITE macro instruction with the 
parameter NEWKEY is issued in the problem 
program between a SETFL instruction and an 
ENDFL instruction (the third macro reguired 
for loading) , it causes ISFMS to load a 
record onto disk. It reguires three 
parameters. The first specifies the 
symbolic name of the file, as specified in 
the DTFIS header entry. The second 
parameter must be the word NEWKEY. The 
thir d parameter must be the letters IS to 
indicate processing by the indexed 
seguential system. 

Before issuing the WRITE instruction for 
an unblocked record, the problem program 
must store the key of the record followed 
by the data in a work area (specified by 
DTFIS WORKL) . 

WORKL - Unblocked Records 

j 1 1 

|Key | Data | 
I | (With or without embedded key) j 
i i . i 

The ISFMS routines construct the I/O area 
(see Figure 18) by moving the data record 
to the data area, moving the key to the key 
area, and building the count area. Then 
they transfer the record to disk storage. 

For blocked records, the problem program 
must store only the logical record in a 
work area (specified by DTFIS WORKL) . The 
key must be part of the data record 
(location specified by DTFIS KEYLOC) , but 
it must not be stored separately as it is 
for unblocked records. 

WORKL - Blocked Records 

i 1 

| Data | 
| (With embedded key) | 
i i 



The ISFMS routines move each data record to 
the I/O area. After the block of records 
in the data portion of the I/O area is 
completed, ISFMS moves the key of the 
highest record in the block into the key 
portion of the I/O area. Then ISFMS 
constructs the count portion and transfers 
the records to disk storage. 

As records are transferred, ISFMS 
performs both a seguence check (to ensure 
that the records are in order by key) and a 
duplicate-record check. If an 
out-of-seguence record or a 
duplicate-record key is detected, ISFMS 
branches to the corresponding user's 
routine (specified by the DTFIS entries 
SQCHEX and DUPREX, respectively) . 

After each record is written, ISFMS 
makes the ID of that record available to 
the problem program. The ID is located in 
an 8-byte field labeled f il enameH . In this 
case filename must be 5 characters long. 
For example, if the file name in the DTFIS 
header entry is PAYRD, the ID field is 
addressed by PAYRDH. By reference to this 
field, the ID of any selected records can 
be punched or printed for later use. This 
will be reguired if the user plans to 
retrieve records in seguential order 
starting with the ID of a particular record 
(see SETL Macro ) . 

As records are loaded onto disk, ISFMS 
writes track-index records each time a 
track' is filled, writes a cylinder-index 
record each time a cylinder is filled, and 
writes a master-index record (if DTFIS 
MSTIND is specified) each time a track of 
the cylinder index is filled. When a track 
index is completed, ISFMS writes a dummy 
record following the last index record. 
This is used in subseguent operations to 
indicate the end of the index and the 
beginning of data records. 

ENDFL Macro 



1 - 1 1 


~ ; ■■ ' _ ' '1 


|Name | Op | 


Operand | 
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| 1 1- 

| | ENDFL | 

I — J — _ JL 


filename | 
, ... , „_ j 



The ENDFL (end file load mode) macro 
instruction ends the mode initiated by the 
SETFL macro. The symbolic name of the file 
that has been loaded is the only parameter 
reguired in this instruction. This name is 
the same as the name specified in the DTFIS 
header entry and the SETFL instruction for 
this file. 

The ENDFL macro performs a close-like 
operation for the. file that has been 
loaded. It writes the last block of data 
records, if necessary, and then writes an 
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end-of-file record after the last data 
record. It also writes any index entries 
that are needed. 

Note: At least one or more records must be 
loaded before the ENDFL macro instruction 
can be executed. If no records are loaded 
before the ENDFL macro is issued, the ENDFL 
macro returns control immediately to the 
user's program without writing an 
end-of-file record. The file then has to 
be reloaded with a new DLAB (disk label) 
card . 



MACRO INSTRUCTIONS TO ADD RECORDS TO A FILE 
BY ISFMS 

After a file has been organized on disk, 
new records can be added to the file. Each 
record is inserted in the proper place 
seguentially by key. This function is 
controlled by specifying ADD or ADDRTR in 
the DTFIS entry TOROUT. 

The file may contain either blocked or 
unblocked records, as specified by the 
DTFIS entry RECFORM. When the file 
contains blocked records, the user must 
provide ISFMS with the location of the key 
field within each record . This is 
specified in the DTFIS entry KEYLOC. The 
records to be added, however, must be 
inserted one record at a time, and they 
must contain a key field in the same 
location as the records already in the 
file. 

Whenever the addition of records is to 
follow sequential retrieval 
(IOROUT= ADDRTR) , the sequential-retrieval 
instruction ESETL must be issued before the 
first record is added to the file (see 
ESET L Macr o) . 

Mac ro In struction 

One macro instruction is available for use 
in the problem program, for adding records 
to a file. 

WRITE. Ma cro 

i — ■ -7j 1 1 

IName j Op | Operand | 
| —\ 1 1 

| | WRITE | filename, NEWKEY, IS | 
i j j i 

When a WRITE macro instruction with the 
parameter NEWKEY is issued in the problem 
program and the DTFIS entry 10 ROUT 
specifies ADD (or ADDRTR) , ISFMS adds the 
record to the previously organized file. 
This is the same instruction, and reguires 
the same parameters, as the WRITE 
instruction that is used for loading a 
file. The only difference is that DTFIS 



I0R0UT specifies ADD (or ADDRTR) instead of 
LOAD. 

For adding records, the problem program 
must store the key of the record followed 
by data in the work area specified by DTFIS 
WORKL, before issuing the WRITE 
instruction. ISFMS then constructs the I/O 
area and transfers the record to disk 
storage. As records are transferred, ISFMS 
checks for duplicate record keys and 
branches to the user's routine (specified 
by DTFIS DUPREX) if a duplication is found. 

To insert the new record properly, ISFMS 
searches the indices to find the correct 
track for the record. If the correct track 
is not an overflow track, ISFMS then 
searches the track for the correct position 
seguentially. The record is inserted, all 
following records are shifted, and the 
highest record on the track is transferred 
to the appropriate overflow area. This is 
the cylinder overflow area if CYLOFL has 
been specified and if the area has not been 
filled. If the cylinder overflow area does 
not have space available, or if only an 
independent overflow area has been 
specified by an XTENT card, the overflow 
record is transferred to the independent 
overflow area. If the cylinder overflow 
area has been filled and an independent 
area has not been specified, however, there 
is no place to store the overflow record. 
ISFMS then branches to the user's routine 
specified by the DTFIS entry ADAREX. The 
user should specify an independent overflow 
area to store this and other overflow 
records. ISFMS also branches to the ADAREX 
routine if an independent overflow area is 
specified but has become filled. In either 
case the job should be restarted with a new 
XTENT card included for the independent 
overflow area. 

Whenever records are to be inserted into 
a logical file of blocked records, ISFMS 
first locates the correct block on the 
track (after the proper track has been 
found) . The block is determined by 
checking the key areas of the disk records. 
Each key area contains the key of the 
highest logical record in the corresponding 
block. Then ISFMS examines the key field 
within each logical record in the block to 
find the exact position to insert the 
record. After the record is inserted, the 
following logical records on the track are 
shifted and reblocked, and the key areas 
are adjusted. The last logical record on 
the track is moved to the overflow area. 

If the proper track for a record is an 
ove rflow track , ISFMS writes the record, 
preceded by a seguence-link field in the 
data area of the record, and adjusts the 
appropriate linkages to maintain sequential 
order by key. Similar to the operation 
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described for the end record in the 
precedinq paragraphs, ISFMS writes the new 
record in either the cylinder overflow area 
or the independent overflow area, or it 
branches to the user's routine if 
necessary . 



If the new record is hiqher than all 
records presently in the file, ISFMS checks 
to determine if the last track containing 
data records is filled. If it is not/ the 
new record is added, replacing the 
end-of-file record. The end-of-file record 
is written in the next record location on 
the same track, or on the following track 
in the prime data area. Another track must 
be available within the file limits. If 
the end-of-file record is the first record 
on a track, the new record is written in 
the appropriate overflow area. After each 
new record is x inserted in its proper 
location, ISFMS adjusts all indices that 
are affected by the addition. 



MACRO INSTRUCTIONS FOR RANDOM RETRIEVAL BY 
ISFMS 

When a file has been organized by ISFMS, 
records can be retrieved in random order 
for processing and/or updating. Retrieval 
must be specified in the DTFIS entry 
IOROUT. Random processing must be 
specified in the DTFIS entry TYPEFLE, and 
updating (if used) must be specified in 
DTFIS UPDATE. If a multipack file is being 
processed, all packs must be on-line. 

Because random reference to the file is 
by record key, the problem program must 
supply the key of the desired record to 
ISFMS. To do this the key must be stored 
in the main-storage key field specified- by 
the DTFIS entry KEYARG. The specified key 
designates both the record to be retrieved 
and the record to be written back into the 
file in an updating operation. 



Na m e of First Co nt rol Se c tion : When DTF 
IOROUT=RETRVE an d"~TYPEFLE= RANDOM are used, 
ISFMS names the first CSECT in the DTFIG 
macro IICSCT. If this DTF is used alone, 
the user's program will come under this 
CSECT name. If it is used in the same 
program with other DTFs, the name of the 
user's first control section will be 
determined as explained under Macro 
Inst ructions for Sequential Retrieval by 
ISFMS. 



Macr o Instructi ons 

Two macro instructions are available for 
use in the problem proqram for retrievinq 
and updating records randomly. 



READ Macro 

i 1 1 1 

| Name | Op \ Operand | 

1 1 1 1 

| | READ | filename, KEY, IS | 
i i 1 i 

The READ instruction causes ISFMS to 
retrieve the specified record from the 
file. This instruction reguires three 
parameters. The first par a meter - specifies 
the symbolic name of the file from which 
the record is to be transferred to main 
storage . This name is the same as the 
name specified in the DTFIS header entry 
for this file. The second -parameter - must 
be the word KEY. The third parameter - must 
be the letters IS to indicate processing by 
the indexed sequential system. 

To locate the record ISFMS searches the 
indices to determine the track on which the 
record is stored, and then searches the 
track for the specific record. When the 
record is found, ISFMS transfers it to the 
I/O area specified by the DTFIS entry 
IOAREAR. The IOCS routines also move the 
data portions of the record to the 
specified work area if the DTFIS entry 
WORKR is included in the file definition. 

When records are blocked, ISFMS 
transfers the block that contains the 
specified record to the I/O area. It makes 
the individual data record available for 
processing either in the I/O area or the 
work area (if specified) . For processing 
in the I/O area, ISFMS supplies the address 
of the record in the register specified by 
DTFIS IOREG. 

If ISFMS does not find the specified 
record, it branches to the user's routine 
specified by the DTFIS entry RTRVEX. 

WRITE Macro 
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WRITE 
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| filename, KEY, IS | 
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The WRITE instruction with the parameter 
KEY is used for random updating. It causes 
ISFMS to transfer the specified record from 
main storage to disk storage. This 
instruction reguires three parameters. The 
fir st paramete r specifies the symbolic name 
of the file to which the record is to be 
transferred. This name is the same as the 
name specified in the DTFIS header entry 
and in the preceding READ instruction for 
this file. The s econd - pa rameter- must be 
the word KEY. The t hird parameter must be 
the letters IS. 
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ISFMS rewrites the record retrieved by 
the previous read instruction for the same 
file. The key specified in the key field 
for the READ instruction determines where 
the record is written. The key need not be 
specified again, ahead of the WRITE 
instruction. 



MACRO INSTRUCTIONS FOR SEQUENTIAL RETRIEVAL 
BY ISFMS 

When a file has been organized by ISFMS, 
records can be retrieved in sequential 
order by key for processing and/or 
updating. Retrieval must be specified in 
the DTFIS entry IOROUT. Sequential 
processing must be specified in the DTFIS 
entry TYPEFLE , and updating (if used) must 
be specified in DTFIS UPDATE. 

Although records are retrieved in order 
by key, sequential retrieval can start at a 
record in the file identified either by key 
or by the ID (identifier in the count area) 
of a record in the prime data area. Or, 
sequential retrieval can start at the 
beginning of the logical file. The user 
specifies, in the SETL macro, the type of 
reference he will use in the problem 
program. 

Whenever the starting reference is by 
key and the file contains blocked records 
(RECFORM=FIXBLK) , the user must also 
provide ISFMS with the position of the key 
field within the records. This is 
specified in the DTFIS entry KEYLOC. To 
search for a record, ISFMS first locates 
the correct block by the key in the ke_y 
area of the disk record. (The key area 
contains the key of the highest record in 
the block.) Then, ISFMS examines the key 
field within each record in the block to 
find the specified record. 

Whenever any type of processing is being 
done for an Indexed Sequential file, all 
packs of a multipack file must be on-line. 

Name of First Co ntrol Section : When 
sequential retrieval is specified, the user 
must place a name in the START card in his 
source deck to define the first control 
section. This permits ISFMS to use an 
ENTRY statement to identify a linkaqe 
symbol defined in this control section and 
used in subsequent control sections. 
However, the user-written portion of the 
program will not be in the control section 
named by the START card. Instead, it will 
be in a control section named by ISFMS. 
The name assigned by ISFMS to the user's 
first control section is Filename3 whenever 
seguential retrieval alone (IOROUT=RETRVE 
and TYPEFLE= SEQNTL or RANSEQ) is specified 
for any file in the source program. 
Filename is the DTFIS header name of the 



first file (in input sequence) for which 
sequential retrieval is specified. 



If sequential retrieval alone 
(IOROUT=RETRVE) is not specified for any 
file, the name assigned to the user's first 
control section depends upon the other 
functions (IOROUT) and/or types of 
processing (TYPEFLE) specified for the 
files in the source program. If either 
sequential add-retrieve (IOROUT=ADDRTR and 
TYPE FLE= SEQNTL or RANSEQ) or load 
(IOROUT=LOAD) is specified for any file, 
ISFMS names the user's first control 
section. If both are specified, for 
different files in the source program, the 
naming function that occurs last (in input 
seguence) determines the name that ISFMS 
assigns, as follows: 



If seguential add-retrieve 
(IOROUT=ADDRTR and TYPEFLE =SEQNTL or 
RANSEQ) occurs last, the control 
section name is Filename3 . Filenam e is 
the DTFIS header name of the last file 
for which seguential add-retrieve has 
been specified. 



If the load function (IOROUT=LOAD) 
occurs last, the control section name 
is FilenameU. Filen ame is the DTFIS 
header name of the last file for which 
the load function has been specified. 



If neither sequential retrieval, 
sequential add-retrieve, nor load is 
specified for any file in the source 
program, ISFMS does not name the user's 
first control section. In this case, the 
first control section is named by the name 
(if any) specified in the START card. 



As a result of these conditions, the 
programmer must be sure to use the 
applicable name if he wishes to continue 
his first control section after it has been 
interrupted by a dummy section or a 
different control section. He must use the 
name assigned by ISFMS (rather than the 
START card) whenever seguential retrieval, 
sequential add-retrieve, or load is 
specified for any file in the source 
program. 



Macro I nstruc t ions 

Four macro instructions are available 
for use in the problem program for 
retrieving and updating records 
sequentially. 
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SETL Macro 



r~ t 

jName | Op 

J 1 


— 1 1 

| Operand | 


| | SETL 
| | SETL 
| | SETL 

L .1 _ 


| filename, BOF j 
| filename, KEY | 
j filename, idname j 

L, „ ■ , , . . 1 



The SETL (set limit) macro instruction 
initiates the mode for sequential 
retrieval, and initializes the ISFMS 
routines to begin retrieval at the 
specified starting address. It reguires 
two parameters. The first parameter 
specifies the symbolic name of the file 
(specified in the DTFIS header entry) from 
which records are to be retrieved. 

The specification entered as the second 
parameter depends on the starting reference 
that is used for the file: beginning of 
the file, key, or ID. 



BOF; If retrieval is to start at the 
beginning of the logical file, the letters 
BOF (beginning of file) must be entered as 
the second parameter. 

KEY: If retrieval is to start at the 
record that contains a specific key 
(control information), the word KEY must be 
entered as the second parameter. In this 
case, the Jcey of the desired record must be 
stored in the main-storage key field 
specified by the DTFIS entry KEYARG. The 
key must be supplied in this field before 
issuing the SETL instruction for the file. 
If ISFMS cannot find the starting record, 
it branches to the user's routine specified 
by the DTFIS entry RTRVEX. 

idname : if retrieval is to start at the 
record that has a specific disk address 
(identifier - ID) , the second parameter 
must specify the symbolic name of a field 
in main storage. The disk address of the 
first record to be retrieved must be stored 
i,n this field before the SETL instruction 
is issued for the file. This idname field 
must be eight bytes long and the user must 
supply the record identification (MBBCCHHR) 
as listed here. All numbers must be 
supplied in binary notation. 

Con- 
Byte Ident. tents Information 

0 M 2-255 Number of the extent 

in which the starting 
record is located. 
The extents for the 
file must be numbered 
so that the first 
extent is number 2, 



the second extent 
number 3, etc. 

1-2 B,B 0,0 Reserved for cell 

number, which relates 
to the IBM 2321 Data 
Cell Drive. These two 
bytes are always zero 
for 2311 disk-storage 
references. 

3-4 C,C 0,1-199 Number of the cylinder 

(1-199) in which the 
record is located. 
The first byte is 
always zero, and the 
second byte specifies 
one of the 199 
cylinders available 
for data records in a 
disk pack. These two 
bytes with the next 
two (HH) provide the 
track identification. 

5-6 H,H 0,0-9 Number of the 

read/write head (0-9) 
that applies to the 
record. The first 
byte is always zero, 
and the second byte 
specifies one of the 
ten disk surfaces in a 
disk pack. 

7 R 1-254 Sequential number of 

the record on the 
track . 

ESETL Macro 



i 1 — r 

|Name '| 
J 1- 


— II" 

Op | 
+- 


Operand 


1 


t I 

i. .l 


ESETL | 
. . .1 . 


filename 


J 

1 

_ _ 1 



The ESETL (end set limit) macro instruction 
ends the seguential mode initiated by the 
SETL macro. The symbolic name of the file, 
which must be the same as the name 
specified in the DTFIS header entry and in 
SETL, is the only parameter required in 
this instruction. 

If blocked records are specified, ESETL 
writes the last block back into the disk 
file in its previous location, if 
necessary. 

When the program reguires seguential 
retrieval followed by the addition of 
records to a file (IOROUT=ADDRTR) , the 
ESETL macro instruction must be issued at 
the end of the sequential retrieval and 
before a WRITE instruction is issued for 
the first addition. If seguential 
retrieval is to be restarted after the 
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additions are completed, the key or ID of 
the last record retrieved must be saved. 
To return to seguential retrieval, the SETL 
macro instruction must be issued again. 

GET Macro 



ir - l 
|Name | 

1 4- 


Op 


i 1 ■" ■■ ■ ■ " — ■' ~ — i 

| Operand | 


1 1 

1 1 
■ ■ 


GET 
GET 


H 1 

| filename., , IS | 
| filename, workname, IS | 

. L_ .„, . _ ,. ., ... , . 1 


The GET 


macro 


instruction causes ISFMS to 



retrieve the next record in seguence from 
the file. It can be written in either of 
two forms, depending on where the record is 
to be processed. 

The f irs t form is used if records are to 
be processed in the I/O area (specified by 
DTFIS 10 AREA S) . It reguires three 
parameters, the second of which is blank 
and represented by a comma. The fir st 
parameter specifies the symbolic name of 
the file from which the record is to be 
retrieved. This is the same name as that 
specified in the DTFIS header entry and in 
the SETL macro instruction for this file. 
ISFMS transfers the record from this file 
to the I/O area, and the record is 
available for the execution of the next 
instruction in the problem program. The 
thi rd parame ter must be the letters IS to 
indicate processing by the indexed 
seguential system. ISFMS makes the data 
portion of each record available by 
supplying its address in the register 
specified by the DTFIS entry IOEEG. When 
the unblocked records are specified, the 
key portion of each record is available at 
the area specified in the DTFIS entry 
IOAREAS. 

The s econd form of the GET instruction 
is used if records are to be processed in a 
work area (DTFIS specifies WORKS) . It 
reguires three parameters. The first is 
the symbolic name of the file, tKe second 
is the symbolic name of the work area, and 
the th ird para meter is the letters IS. 
ISFMS transfers both the key of the record 
and the data to the specified work area for 
unblocked records. For blocked records, 
ISFMS transfers only the data portion of 
the record to the specified work area. The 
record is available for the execution of 
the next program instruction. 

If blocked records and updating are 
specified in the file definition, each GET 
that transfers a block of records to main 
storage will, if necessary, also write the 
preceding block back into the disk file in 
its previous location. GET writes the 
preceding block if a PUT instruction has 
been issued for at least one of the records 



in the block. If no PUT instructions have 
been issued, updating is not reguired for 
this block and GET does not write the 
block. 

PUT Macro 



1 - — 

| Name 
| 


Op 
1 


i ■-■ — ■- -■ ■■■■ — 

| Operand 


i 
1 


1 

1 
i 


PUT 
PUT 
, . 


— 1 

| filename,, IS 

| filename, workname, IS 


^ 

1 

1 
• 



The PUT macro instruction is used for 
sequential updating of a disk file, and 
causes ISFMS to transfer records to the 
file in sequential order. It must be 
preceded by a GET instruction for that 
file. The PUT instruction may be written 
in either of two forms, depending on where 
records are processed. 

The first for m is used if records are 
processed in the I/O area (specified by 
DTFIS IOAREAS) . It reguires three 
parameters, the second of which is blank 
and represented by a comma. The first 
parameter specifies the symbolic name of 
the file to which the records are to be 
transferred. This is the same name as 
specified in the DTFIS header entry, the 
SETL instruction, and the GET instruction 
for this file. The third p aramete r must be 
the letters IS to indicate processing by 
the indexed sequential system. 

The second form of the PUT instruction 
is used 'if records are processed in a work 
area. It requires three parameters. The 
first is the symbolic name of the file, the 
second is the symbolic name of the work 
area, and the third is the letters IS. The 
work-area name may be the same as that 
specified in the preceding GET for this 
file, but this is not reguired. ISFMS 
moves the record from the work area 
specified in the PUT instruction to the I/O 
area specified for the file in the DTFIS 
entry IOAREAS. 

When unblocked records are specified, 
each PUT writes a record back onto the disk 
file in the same location from which it was 
retrieved by the preceding GET for this 
file. Thus, each PUT updates the last 
record that was retrieved from the file. 
If some records do not reguire updating, a 
series of GET instructions can be issued 
without intervening PUT instructions. 
Therefore, it is not necessary to rewrite 
unchanged records. 

When blocked records are specified, PUT 
instructions do not transfer records to the 
disk file. Instead, each PUT indicates 
that the block is to be written after all 
the records in the block have been 
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processed. When processing for the b lock 
is complete and a GET is issued to read the 
next block into main storage , that GET 
also writes the completed block back into 
the file in its previous location. If a 
POT instruction is not issued for any 
record in the block, GET does not write the 
completed block. At the end of the file 
the ESETL macro instruction writes the last 
block processed, if necessary. 
NOTE: The user should insert an LTORG 
statement in his assembler deck whenever 
more than one control section is generated 
by the ISFMS macros (Load and/or Retrieve 
functions) . This is to provide 
addressability for the generated literals 
in the imperative macros. 



PROCESSING WITH STR DEVICES 

Logical IOCS provides macro instructions 
for processing with STR (Synchronous 
Transmit ter- Receiver) devices. These 
devices can be remotely attached to a 
System/360, Model 30, 40, 50, 65 or 75, 
through an IBM 2701 Data Adapter Unit, 
eguipped with an IBM Synchronous Data 
Adapter, Type I. 

Whenever STR macro instructions are used 
to transmit and receive data or furnish 
line control, each synchronous data adapter 
must be defined by the declarative macro 
DTFSN (Define The File for Synchronous 
Transmit ter- Receiver use) . The operand 
entries for the DTFSN (and for the DTFRF 
macro) are described under File Defin i tio n 
Macr os . 

Before processing can be done with STR 
devices, the adapter must be initialized. 
Logical IOCS provides a unique imperative 
macro instruction, SOPEN (open STR 
adapter) , to initialize the adapter for STR 
processing. 



SOPEN - Macro 

The SOPEN (open STR adapter) macro 
instruction turns on the adapter, 
establishes the mode, and establishes 
synchronization. The SOPEN operands 
determine the line interfaces on the 
adapter, the data transmission rate, the 
data transmission mode, and the type of 
data checking to be performed. Where the 
dial option is present, SOPEN may also dial 
a number, monitor for ringing, and 
establish a connection. 



SOPEN must be issued for a line before a 
READ, WRITE, or CNTRL macro is issued for 
that line. 



Completion of a SOPEN macro is indicated 
in the traffic (or wait) bit and the unit* 
exception bit in the channel command block 
(CCB) . The WAIT macro or the WAITM macro 
should be used to check for completion of 
the SOPEN macro. 



The lost data and unit exception 
(end-of-file) bits should be checked by the 
problem program upon completion of a SOPEN 
macro instruction. If SOPEN could not 
establish synchronism, and an operator 
reply of 4 was given, the lost data and 
unit exception bits will be on. If the 
remote terminal attempted to transmit 
before synchronism was established, the 
unit exception bit will not be on, 
indicating the SOPEN macro could not 
complete successfully. 



SOPEN can be reissued with the same or 
different operands after a SCLOS macro to 
begin transmission or reception of data to 
the same or another device. 
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NAME 


OPERATION 


OPERAND 


COMMENTS 




SOPEN 


DTFNAME=dtfname 


Symbolic name of DTFSN macro 






DIAL=IN 
OUT 


Answering 
Calling 






°INTFAC=A 
' T 

BOTH 


* Which line interface on the adapter to use. 
BOTH may only be specified when DIAL=1N. 






# INTLRC=NO 
YES 


LRC check should be performed on record or 
group mark . 






INTLRCB=NO 

YFS 

1 CO 


When INTFAC=BOTH, INTLRCB provides for 
l.i\v* cnecK ror inTcriace d as iinilkv^ pro 
vides for interface A. 






# SPEED=X 
Y 

L. 

CLOCK 


*data transmission rate expressed in 
characters/second . 






SPEEDB=X 
Y 

CLOCK 


When INTFAC=BOTH / SPEEDB provides the 
data transmission rate for interface B, as 
SPEED provides for interface A. 






# MODE=FULL 

POI IP 

TWO 


Full duplex 
Four wire half duplex 
Two wire half duplex 
(data transmission modes) 






N\\J U C Dt U L.L 

FOUR 
TWO 


\A/L.„ 1 KITE Af~=nf"1TLJ MOHCR J„<. n _ - ,. tU„ 

When irNlrAi- = Dv~'lrl / lyvuuco aetermines trie 
data transmission made for interface B, while 
MODE provides for interface A. 






NUMB=n 


General register (2-1 1) loaded by problem 
program with address of DIALO macro. Must 
be supplied when DIAL = OUT. 


Underlined choices will be assumed if operand is omitted. 
°INTFAC must be "=A" if Dual Communications Interface feature is not present. 
Supplied by DIALO macro when SOPEN DIAL=OUT. 

*For further reference see the section Communications: Synchronous Adapter in the publication IBM 2701 Data Adapter Unit: 

Principles of Operation (Form A22-6864). 



Figure 26. SOPEN Macro 



The SCPEN macro instruction is coded 
with the keyword operands as shown in 
Figure 26. 

Where the problem program wishes to use 
the facilities of STR devices attached over 
a dial network (with the Automatic Call 
Feature installed) , logical IOCS provides a 
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declarative macro instruction, DIALO (dial 
out) , to supply the dial address and 
various parameters reguired by the SOPEN 
macro. 



NAME 


OPERATION 


OPERAND 


COMMENTS 




DIALU 










LENGTH =n 


The total number of digits in the telephone number 
to be dialed (sum ot ACODc and DIC3IT5 






ACODE = number 


The area code, or any digits not included in 

ii r\i/^ itch 
DI(3ITb . 






DIGITS = number 


The telephone number to be dialed (maximum of 7 
digits). 






# INTFAC=A_ 
B 


* Which line interface on the adapter to use. 






* INTLRC=YES 
NO 


LRC check should be performed on record or 
group mark. 






# SPEED = X 
Y 
Z 

CLOCK 


* Data transmission rate expressed in characters/ 
second. 






# MODE = FULL 
FOUR 
TWO 


Full duplex 

Four- wire half duplex 
Two - wire half duplex 
(data transmission modes) 


Underlined choices will be assumed if operand is omitted. 

* For further reference see the section, Communications: Synchronous Adapter, in the publication IBM 2701 Data Adapter Unit: 
Principles of Operation (Form A22- 6864). 

# See SOPEN Macro. 



Figure 27. DIALO Macro 



DIALO Macro 

The declarative DIALO (dial out) macro 
instruction generates the proper constants 
required by the SOPEN macro to dial and 
synchronize with the selected terminal. 



The DIALO macro operands provide the 
actual number to be dialed and the number 
of digits in that number. Other operands 
specify the line interface on the adapter, 
the data transmission speed, and the data 
transmission mode. For a further 
explanation of DIALO operands see Figure 
27. 



Once the SOPEN and DIALO macros have 
established the proper connection between 
the STR devices, logical IOCS provides 
several imperative macro instructions for 
the actual processing (transmission, 
reception, and control) of data. 



READ Macro 



INamejOp |0perand 



1 1 r 

| | READ| dtfname, STR 



The READ macro instruction is used to read 
one record from the STR device specified in 
the DTFSN (referenced in the READ macro by 
"dtfname"). 

The area into which the data will be 
read must be determined by the problem 
program before the READ is issued. The 
problem program must store the starting 
address of the designated area into the 
"abuck" portion of the expanded STR CCB 
(see Figure 42) . The problem program must 
also store the length of the designated 
area in "lbuck" in the STR CCB. 

Before a READ macro instruction is 
issued, the line must be SOPEN' ed, and a 
CNTRL macro with the operand PREP (prepare) 
must be issued and successfully completed. 
The problem program must be sure that the 
READ is complete (using the WAIT or WAITM 
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macro) before issuing another READ for the 
same adapter. 

WRITE Macro 

i 1 1 1 

|Name|Op | Operand | 

I 1 Y 1 

| | WRITE| dtfname, STR | 
i i i i 

The WRITE Macro instruction is used to 
write one record to the STR device 
specified in the DTFSN macro (referenced in 
the WRITE macro as "dtfname") . 

The area from which the data will be 
written must be specified by the problem 
program before the WRITE is issued. The 
problem program must store the starting 
address of the designated area into the 
"abuck" portion of the expanded STR CCB 
(Figure 42) . The problem program must also 
store the length of the designated area in 
"lbuck" in the CCB. 

Before a WRITE macro instruction is 
issued, the line must be SOPEN'ed, and a 
CNTRL macro with the operand INQ (inguiry) 
must be issued and successfully completed. 
The problem program must be sure that the 
WRITE is complete (using the WAIT or WAITM 
macro) before issuing another WRITE for the 
same adapter. 

CNTRL Macro 



r . - t i 

| Name| Op 


Operand 


..... , 
1 

1 


1 1 1 

| | CNTRL 
■ ■ i 


h — ; ■ 

dtfname, code, n 
. .... 


1 
i 



The CNTRL (control) macro instruction 
provides orders to the Data Adapter and the 
terminal. Orders apply to physical nondata 
operations of a unit and are peculiar to 
the unit involved. 

CNTRL reguires either two or three 
operands. The first operand (dtfname) must 
be the symbolic name of the DTFSN macro or 
line on which to perform the function 
specified in the code operand of the CNTRL 
macro. The second operand specifies the 
mnemonic codes (see Figure 14) for the 
operation to be performed: 

EOF (End of Transmission) ends the 

transmission to an STR device. EOF 
may not be used during a read seguence 
(the time between a PREP issued and an 
EOF received) . 

INQ (Inguiry) sends INQ to the STR device. 
INQ must be successfully completed 
before a WRITE is issued. The INC 
RCVD (inguiry received) bit on in the 



Expanded STR CCB (see Figure 42) 
should be checked. If INQ RCVD is ON, 
the remote terminal is attempting to 
transmit and the CNTRL INQ cannot 
complete successfully. INQ may be 
issued following a CNTRL PREP (when 
INQ is issued following a PREP, the 
PREP operation is discontinued) . INQ 
may not be issued during a read 
seguence, or during a write seguence 
(the time between an INQ issued and 
EOF) . 



PREP (Prepare) monitors the line for 

receiving INQ, EOF, or TEL from the 
STR device. Before a READ is issued, 
PREP must be successfully completed. 
PREP may not be issued during a write 
seguence. 

TEL (Alternate Mode) sends the TEL signal 
to an STR device. TEL may not be 
issued during a read or write 
seguence. 

The third oper and (n) specifies a count 
to be used if other than: 

EOF - 2 
TEL - 2 
INQ - 10 

PREP - Not applicable 

This count is the number of times the 
particular signal will be sent until the 
correct reply to that signal is received. 
When the count is exceeded, an error 
condition results. An operator message is 
given. 

The DTFSN must be SOPEN'ed before any 
CNTRL macro is issued. 

If the problem program issues an EOF, 
INQ, PREP, or TEL out of seguence (during a 
read or write seguence) , an operator 
message is issued, the STR lines are 
properly disabled, and the job is 
terminated with a dump. 

The problem program must be sure that a 
CNTRL macro is complete (using the WAIT or 
WAITM macro) before issuing another 
imperative STR macro instruction. 
Exceptions to this are: SCLOS (close STR 
adapter) , which may be issued at any time, 
and an INQ issued following a PRE D , which 
has been explained previously. 



CDCNV Macro 

I 1 T 

| Name | Op |Operand 

I 1 — -\ 

I | CDCNV | type, startaddr, length 
i 1 1 — 
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The CDCNV (code conversion) macro 
instruction provides for the conversion of 
the internal code of the transmitter 
(EBCDIC, BCD, or Binary) to the standard 
STR transmission code (fixed count 
four-out-of-eight [4/8]) , or for the 
conversion of 4/8 code to the internal code 
of the receiver. 

The first of three required operands, 
"type", is coded as A, B, C, D, E, or F, 
arid specifies: 

A - Convert for transmitting EBCDIC (256 
character set) from System/360. 

B - Convert for receiving EBCDIC (256 
character set) from the terminal. 

C - Convert for transmitting EBCDIC (256 
character set) to a 1978 in column 
binary mode. 

D - Convert for receiving EBCDIC (256 

character set) from a 1978 in column 
binary mode. 

E - Convert for transmitting BCD (56 

character set) or binary (64 character 
set) to any STR device. All invalid 
characters are replaced with colon 
(124 8. .. .) . 

F - Convert for receiving BCD (56 character 
set) or binary (64 character set) from 
any STR device. 

The s econd op e ran d (startaddr) specifies 
the symbolic name of a full word containing 
the actual address of the leftmost byte of 
the field to be converted. 

The third operand (length) specifies the 
symbolic name of a half word containing the 
number of bytes to be converted. 

For types A and C, each EBCDIC character 
is converted to two 4/8 characters. 
Therefore, the length of the field provided 
for the converted characters must be twice 
the length of the area being converted. 

For types B and D, two 4/8 characters 
are converted to one' EBCDIC character. 
Therefore, the length of the converted 
field is one-half the length of the area to 
be converted. 

Also, for types E and F, the BCD or 
substitute blank (2-8 punches) translates 
as "2-4-8-0" in 4/8 code while a blank (no 
punches) translates as "R-O-X-N" in 4/8 
code. The CDCNV macro, types E and F, may 
be modified to transmit or receive the BCD 
or substitute blank. (See Appendix L.) 

For a discussion of the WAIT and WAITM 
macros used for processing with STR 



devices, see PROCES S ING RE C ORDS -WITH 
PHYSICAL IOCS , under WAIT Macro and WAITM 
Macro. 

SCLOS Macro 

r 1 1 1 

|Name|0p |0perand | 

I 1 1 1 

| | SCLOS | dtfname | 
i 1 1 . j 

Logical IOCS also provides a unique macro 
for completion of STR processing. The 
SCLOS (close STR adapter) macro turns off 
the adapter. It may be issued at any time 
in the problem program. SCLOS must be 
issued when all transmission to the line 
specified in dtfname is completed, or when 
the problem program Wishes to SOPEN the 
line with different operands. The problem 
program should SCLOS all lines before 
end-of- job. 

Binary Synchronous Communic ation 

Logical IOCS provides macro support 
routines designed to supply the facilities 
for sending and receiving data. It uses an 
IBM 2701 Data Adapter Unit equipped with an 
IBM Synchronous Data Adapter — Type II, 
connected by leased or dial line to a 
remote IBM System/360, Model 30, 40, 50, 
65, 67 (working in 65 mode) , or 75. The 
remote CPU is equipped with an IBM 2701 
Data Adapter Unit with an SDA II or an IBM 
2703 Transmission Control Unit with Binary 
Synchronous features. 

BSC.. Line Control 

Transmission is initiated in a 
point-to-point, CPU-to-CPU communications 
environment when one CPU successfully sends 
the Inquiry (ENQ) signal to the other CPU. 
For a leased line, BSC macro support 
provides the CNTRL Prepare (PRP) macro 
instruction to receive the ENQ and the 
CNTRL ENQ macro instruction to send the 
ENQ. (READ ENQ--Type TQ — -also receives the 
ENQ signal.) 

The ETX (ETB is also valid) control 
character is expected to be the last 
character of a message and, as such, 
indicates normal completion to a READ 
macro. Normally STX is the valid 
start-character of a text message. The SOH 
character is also valid. For transparent 
text, DLE STX and DLE ETX (or DLE ETB) are 
valid text-framing characters. 

BSC support routines maintain a system 
of alternating acknowledgments (ACK-0 and 
ACK-1), positive responses to alternate 
text messages, for protection against 
message duplication or loss^ The WRITE 
macro includes, following the actual WRITE 



116 



S/360 BOS Assembler with I/O Macros 



channel command, a READ command to receive 
the alternating acknowledgment. READ ENQ 
(type TQ) issues a READ command to receive 
a control character (ENQ) from the remote. 
CPU. All other READ macro types issue a 
WRITE command to send the appropriate 
alternating acknowledgment for the last 
message (or control character) received, 
before issuing a READ command for this 
message. If the incorrect alternating 
acknowledgment is received, BSC error 
recovery retransmits the previous text 
message or control character until the 
correct alternating acknowledgment is 
received or until the retry count (RCOUNT 
in the DTFBS macro instruction) is 
exhausted. If the retry count has been 
exceeded and the correct alternating 
acknowledgment has not been received, the 
Message Format Error and Wrong ACK bits are 
posted to the BSC CCB. 



BSC error routines perform ether 
line-control analysis functions. The CNTRL 
macros (except CNTRL EOT on a leased line 
and CNTRL DSC) expect certain responses and 
include the channel commands to receive 
these responses. 



Hacro 
CNTRL PRP 

CNTRL EOT (dial line) 
CNTRL WABT 
CNTRL ENQ 



Response - Expected 
ENQ 

DLE EOT, EOT, or ENQ 

ENQ 

ACK-0 



Invalid or unexpected responses detected by 
BSC error routines are posted to the CCB 
(unexpected response and I/O error) after 
the retry count is exhausted. 

Refer to Appendix M, Part-2 for CCB bits 
to be checked after completion of BSC 
operations. Refer to Appendix-Mr Part 1 
for a table containing a more precise 
description of each control character. 
Refer to Appendix - M, Part 3 for a sample 
program illustratinq how the problem 
program can use BSC support macro 
instructions for basic line control. 

When BSC support macro instructions are 
used to transmit and receive data, the data 
adapter (SDA II) must be defined by the 
file-definition macro DTFBS (Define The 
File for Binary Synchronous Communication) . 
This macro (and the DTFRF macro) are 
described under File Definition Macros . 

Before any processing can be done within 
the CPU-to-CPU environment, the data 
adapter must be initialized. Logical IOCS 
provides the unique imperative macro 
instruction, BOP EN (open BSC adapter) to 
initialize the adapter. 



BOPEN Macro 



1 T T ~ " 1 

| Name| Operation| Operand | 
■ it i 


| | BOPEN | DTFNAME=dtfname, 




| | |INTRFC=A, 




II |B 




| | | DIAL=YES, 




II 1 NO 




1 1 1 

| | |CODE=A 




I I IB 




ii i 


i 



The BOPEN macro establishes the mode and, 
on a leased line, turns on the adapter (SDA 
II) . 

BOPEN must be issued for a line before 
any IDIAL macro or any READ, WRITE, or 
CNTRL macro. It may be reissued with the 
same or different parameters following the 
BCLOS macro instruction. 

The first - keyword operand specifies the 
symbolic name given to DTFBS for the line. 

The second -keyword operand (INTRFC= ) 
specifies which adapter interface (A or B) 
is to be used. If this operand is omitted, 
INTRFC=A is assumed. 

The third keyword operand (DIAL= ) 
specifies whether the line is dial 
(DIAL=YES) or leased (DIAL=NO) . If the 
DIAL parameter is omitted, DIAL=NO is 
assumed. 

The fourth keyword operand (CODE= ) 
specifies the code that is EBCDIC (A or B) . 
This parameter applies when the dual code 
feature of the SDA II is present. If the 
CODE parameter is omitted, CODE=A is 
assumed. 

If DIAL=YES is specified, the BOPEN 
macro must be followed by an IDIAL macro 
instruction to establish the connection. 
If DIAL=NO is specified, or assumed, BOPEN 
should be followed by a CNTRL operation 
(PRP or ENQ) or may be followed by a READ 
ENQ (Type TQ) . 

At the completion of the BOPEN macro, 
the problem program should check for normal 
completion (as in A ppendix M« Part - 2 ) 
before continuing. 

IDIAL Macro 

The IDIAL macro instruction performs the 
initial line control functions necessary 
for dial lines. It dials a number, 
monitors a line for "ringing" or handles 
ID-verification. IDIAL also reads or 
writes one text record from or to the 
remote CPU. 
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TDIAL must be issued for a dial line 
immediately following the BOPEN macro 
instruction and preceding any READ , WRITE , 
or CNTRL operation. IDIAL should not be 
used for a leased line. 

The area address and length fields in 



the starting address and length (including 
the text-framing characters) of the data to 
be read or written before issuing the IDIAL 
macro. 



The IDIAL macro is coded with the 



the expanded BSC CCB 


must be loaded 


with keyword operands as shown in Figure 28. 


r— t t- 

| Name | Operation | 


Operand 


— i — — ■■ - -■ ■■ ■ ■ i 

| Comments | 


| | IDIAL | 


DTFNAME=dtfname 


| Symbolic name given to the DTFBS for this line. j 




CALLS 
DIAL= ANS* 
MAN 


| This CPU is calling, answering, or j 
j establishing the connection with | 
| the remote CPU manually. j 


H — \ 


NONE 
SNDID 
°ID= RCVID 
BOTH 


| ID- verification: no ID-verification, | 
| send ID characters, receive | 
| ID characters, or both send and | 
| receive ID characters. | 




RD 

OPTYPE= WT 
WTX 


| Read a text record. | 
j Write a text record. | 
j Write a record of transparent text. j 


i .i. i 


HEG=n 


| General register (2-11) to be loaded by the j 
| problem program with the address of the | 
| IDLST. This parameter may be omitted only j 
| if there is no IDLST (i.e., DIAL=ANS/MAN, | 
| ID=NONE) . | 



# If DIAL=CAIL, the Automatic Call Feature must be installed, 

OPTYPE must be either WT or WTX. 

* If DIAL=ANS, OPTYPE must be RD. 

o If the ID parameter is omitted, ID=NONE is assumed. 



Figure 28. IDIAL Macro 



For OPTYPE=WT (normal WRITE) , the 
problem program normally should provide the 
text-framing characters, STX and ETX. For 
OPTYPE=WTX (transparent WRITE) , the problem 
program must supply the start-character 
seguence, DLE STX; macro support provides 
the end-character seguence, DLE ETX. As 
with any WRITE macro, no line control 
characters should appear in the text unless 
a transparent WRITE is used. 

ID- verification procedures, if included, 
allow two CPU' s connected by dial line to 
identify themselves by exchanging seguences 



of up to 15 hexadecimal graphic characters. 
The problem program must provide these 
character seguences in an IDLST. The 
correct control (or response) character 
must be provided following the last 
ID-character in each ID-seguence and must 
be added' to the count. See Figure 29 and 
Appendix M, Part 1. The IDLST may also 
contain the digits to be dialed (for 
DIAL=CALL) , up to 15 digits (expressed as 
characters or as hexadecimal digits) . 
Refer to Figure 30 for the format of the 
IDLST and for examples. 
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IDIAL 
OPERANDS 



CONTROL (OR RESPONSE) CHARACTER TO BE INCLUDED 
AFTER THE LAST ID-CHARACTER *<> 



SNDID CHARACTERS 



RCVID CHARACTERS 



DIAL=C ALL/MAN 
OPTYPE=WT/WTX 

DIAL=ANS/MAN 
OPTYPE=RD 



ENQ 
ACK-0 



ACK-0 
ENQ 



* Refer to Appendix M, Part 1 for the hexadecimal representation of the character and 
the length in bytes to be added to the count. 

0 The problem programmer must provide both SNDID and RCVID control (or response) 
characters if he includes any ID-verification (if he codes ID=SNDID/RCVID/BOTH) . 



Figure 29. ID-Character Seguence, Control Characters 
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IDLST 



NUMBER OF 
DIAL DIGITS 


DIGITS TO BE DIALED 


COUNT * 


ID CHARACTERS TO BE SENT (SNDID) 


COUNT * 


ID CHARACTERS EXPECTED (RCVID) 


RCV AREA - ID CHARACTERS RECEIVED WILL BE READ 
INTO THIS AREA AND CHECKED ** 


* COUNT includes the number of ID - characters (up to 15) plus 
the length in bytes of the control (or response) character. 

** The length of the RCV AREA should be equal to the number of 
ID - characters expected plus the length in bytes of the control 
(or response) character expected. 



Examples: 

(1) DIAL=CALL,ID=NONE 



[No other parameters are required.] 
(2) DIAL=CALL, I D=SN Dl D 



IDLST 



X'4' 


X'Ol 020304' | 


X'4' 


ORAL' 


X'2D'l 


X'2' 


X'1070' 









no. of digits - dial digits 
count - SNDID - ENQ 
count - ACK-0 
RCV AREA 



(3) DIAL=CALL,ID=RCVID 
IDLST 



X'4' 


C'1234' 




no. of digits - dial digits 


XT 


X'2D' 




count - ENQ 


X'5' 


C'BOS' 


X'1070' 


count - RCVID - ACK-0 




RCV AREA 



(4)_ DIAL=CALL, I D=BOTH 
IDLST 



(5) DIAL=ANS/MAN, ID=SNDID,OPTYPE=RD 



dial digits 


IDLST 


X'5' 


C'BOS' 


X'1070' | 


count - SNDID - ACK-0 






XT 


X'2D' 




count - ENQ 










RCV AREA 



(6) DIAL=AND/MAN / ID=RCVID,OPTYPE=RD 
IDLST 



X'2' 


X'1070 1 | 


X'4' 


C'RAL' | X'2D' 





count - ACK-0 
count - RCVID - ENQ 
RCV AREA 



(7) DIAL=ANS/MAN, ID=BOTH,OPTYPE=RD 
IDLST 



X'5' 


C'BOS' 


X'1070' I 


X'4' 


C'RAL' 


X'2D' 









count - RCVID - ENQ 
RCV AREA 



Notes: 



X'4' 


C'1234' 




no. of digits - dial digits 

count - SNDID - ENQ • 


X'4' 


C'RAL' 


X'2D' | 


X'5' 


C'BOS' 


X'1070' 


count - RCVID - ACK-0 
RCV AREA 





For DIAL=MAN,OPTYPE=WT/WTX the IDLST form is the 
same as for the DIAL=CALL examples, except that no dial 
digits are required. 

For DIAL=ANS/MAN, ID =NONE no IDLST is required. 
(The REG=n parameter on the IDIAL macro instruction is 
also not required.) The IDLST will be provided by macro 
support. 



Figure 30. IDLST Format and Examples 



ID-checking is performed by the CPU that 
receives an ID-sequence. For example, if 
ID=SNDID is coded, the remote CPU receives 
and checks the ID-characters and control 
(or response) characters. If the specified 
ID-sequence (s) and responses are valid, the 
first text record is read or written. 



The WAIT macro or WAITM macro should be 
used to check for the completion of the 
IDIAL macro instruction. 



Upon completion of the IDIAL macro 
instruction, the problem program should 
check the normal completion bit in the BSC 
flag bytes of the CCB. If normal 
completion is not indicated, the program 
should check further in the "completion" 
and "received" BSC flag bytes. (See 
Appe ndix M, Part 2 . ) 

Once the proper connection has been 
established (with BOPEN and, on a dial 
line, IDIAL) , logical IOCS provides 
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imperative macro instructions for the 

actual processing (sending or receiving) of 
data. 

READ Macro 

■ i i i 

| Name| Operationl Operand | 

| 1 1 1 

| | READ | dtfname, BSC, type-cede | 
i 1 j i 

The READ macro instruction provides five 
READ types, each of which causes the 
reading of one record from the remote CPU. 

The five types are: 

• Continue (TN) . One record, of the 
length specified in the length field of 
the expanded BSC CCB, is read into the 
data area pointed to in the CCB. 

• Continue with leading graphics (TG) . 
The graphic characters contained in the 
parameter list pointed to by the CCB 
are written to the remote CPU. (See 
Figure 31 for the form of the parameter 
list.) One record, of the length 
specified in the CCB, is then read into 
the data area pointed to in the 
parameter list. 

• Repeat (TP) . A NAK control character 
is sent to the remote CPU to reguest 
retransmission of the last record. The 
record, of the length specified in the 
CCB, is read into the data area pointed 
to by the CCB. 

• Repeat with leading graphics (TL) . The 

graphic characters contained in the 
parameter list pointed to by the CCB 



are written to the remote CPU. The NAK 
control character is then sent to the 
remote CPU to reguest retransmission of 
the last record. The record, of the 
length specified in the CCB, is then 
read into the data area pointed to by 
the parameter list. See Figure 31. 



• Inguiry (TQ) . This READ- type may be 

used to read the ENQ control character. 
The ENQ signal, when received, is read 
into the response area of the CCB. 



The third operand on the READ macro must 
contain one of the available type-codes: 




See the preceding description of each type. 

Before issuing a READ macro, (except 
READ TQ) , the area address field and the 
length field of the expanded BSC CCB must 
be properly loaded with the starting 
address and length (including the 
text-framing characters) of the data area 
(or the parameter list address and data 
area length the types TG or TL — READ'S with 
leading graphics) . 

The line must be established (with BOPEN 
and, on a dial line, IDIAL) before the 
first READ macro instruction is issued. A 
CNTRL Prepare (PRP) should have been 
successfully completed before issuing the 
first READ on a leased line. 



DTFBS 
(CCB) 



LENGTH 
FIELD 




PARAMETER 
LIST 



Note: There may be up to seven graphic characters. 

The byte preceding the first graphic character is 
reserved for a binary count of the number of graphics. 



■ 1 

RE 


i 1 ■ i 

AD area address 




CT 


GRAPHIC CHARACTERS I 



Figure 3 1. Parameter List for READ with Leading Graphics 
(Type-Code TG or TL) 
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The WAIT or WAITM macro should be used 
to check for the completion of the READ 
macro instruction. 

Upon completion of the READ macro 
instruction, the problem program should 
check the normal completion bit in the BSC 
flag bytes of the CCB. If normal 
completion is not indicated, the program 
should check further in the "completion" 
and "received" BSC flag bytes. (See 
Ap pendix^ M, t Part 2 .) If normal completion 
is indicated, the problem program should 
also check the EOT received bit in the BSC 
flag bytes. 



WRITE Macro 



|Name| Operationl Operand 



WRITE 



| dtfname,BSC,type-code 



JL 



The WRITE macro provides five WRITE types, 
each of which causes the writing of one 
record to the remote CPU. 

The five WRITE types are: 

• Continue ( TT) . One record, ofrthe 
length specified in the CCB, is written 
from the data area pointed to in the 
CCB. 

• Transparent T ext . C?X) or Transparent 
Block (TXB ) . One record (or block) of 
the length specified in the CCB, is 
written from the data area pointed to 
in the CCB and the correct 
end-character seguence (DLE ETX or DLE 
ETB, respectively) is written. 



• Conversational (TC) . The problem 
program must set up a parameter list 
containing the length and starting 
address of the WRITE data area and the 
READ data area in that order. One 
record, of the length specified in this 
list, is written from the data area 
specified in the list. The response 
message (or control character) is then 
read into the specified READ data area. 
The parameter list is of the form 
indicated in Figure 32. 

• Transparent- Conversational (TV) . One 
record, of the length specified in the 
parameter list pointed to in the CCB is 
written from the data area pointed to 
in the parameter list. The character 
sequence DLE ETX is written. The 
response message (or control character) 
is then read into the specified READ 
data area. Refer to Figure 32 for the 
correct form of the parameter list. 

The third operand must contain one of 
the five available type-codes: 




See the preceding description of each type 

Before issuing a WRITE macro* the area 
address field and the length field of the 
expanded BSC CCB must be properly loaded 
with the starting address and length 
(including the text-framing characters) of 
the data area (or with the parameter list 
address and X'FFFF* for types TC or 
TV—conversational WRITE' s) . For 



DTFBS 
(CCB) 



LENGTH 
FIELD 



AREA ADDRESS FIELD 
i i i 



X'FFFF' 
i . 




PARAMETER 
LIST 



— 1 

WRITE area length 


1 1 1 

WRITE area starting address 


1 

READ area length 
• 


1 1 1 

READ area starting address 
I I I 



Figure 32. Parameter List for Conversational WRITE ' s 
(Type TC or TV) 
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WRITE-types TX, TXB, or TV, the DLE ETX (or 
DLE ETB) character sequence provided by 
macro support is not to be included in the 
length. 



The line must be established (vith BOPEN 
and, on a dial line, IDIAL) before the 
first WRITE macro instruction. A CNTRL ENQ 
should be issued before the first WRITE 
macro on a leased line. 

The problem program normally should 
provide the text-framing characters, STX 
and ETX, for WRITE Continue (type TT) and 
WRITE Conversational (type TC) . For 
transparent WRITE 1 s (types TX, TXB, and 
TV) , the problem program must supply the 
start-character seguence, DLE STX. Macro 
support provides the correct end-character 
seguence: DLE ETX for type TX or TV, DLE 
ETB for type TXB. No line control 
characters should appear in the text unless 
a transparent WRITE is used. 

A conversational WRITE (type TC or TV) 
that reaches normal completion (a valid 
text message was received) should be 
followed by a READ Continue (type TN) to 
ensure that the system of alternating 
acknowledgments is correctly maintained. A 
conversational WRITE (type TC or TV) that 
receives graphics or some other response 
(not a valid text message) may be followed 
by another WRITE or CNTRL operation. 

On a switched line, if an EOT is 
received in response to a text write, the 
transmitting CPU (which issues the WRITE 
macro) must issue a CNTRL EOT macro 
instruction to allow the receiving CPU to 
issue CNTRL ENQ and begin transmitting. 

The WAIT or WAITM macro should be used 
to check for the completion of the WRITE 
macro instruction. 

Upon completion of the WRITE macro 
instruction, the problem program should 
check the normal completion bit in the BSC 
flag bytes of the CCB, If normal 
completion is not indicated, the program 
should check further in the "completion" 
and "received" BSC flag bytes. (See 
Appendix M, Part 2 . ) 



CNTRL Macro 



1 — — T 

| Name | 


- -i 

Operation 
1 


- ■ — " — i 

Operand | 


1 \ 

1 1 

i . . i 


CNTRL 


1 , 

dtfname,code | 

• 



The CNTRL (control) macro instruction 
provides orders to the data adapter 
pertaining to line control. 



CNTRL reguires two operands. The first 
operand (dtfname) must be the symbolic name 
on the DTFBS macro. The se cond operand 
specifies one of the following mnemonic 
codes for the operation to be performed: 

• PRP (Prepare) is used to monitor a 
non-switched line for activity. The 
operation completes when a signal of 
activity (normally an ENQ) is received 
from the remote CPU. CNTRL Prepare 
should be coded preceding the first 
READ macro and following BOPEN on a 
non-switched line. CNTRL Prepare 
should not be used for a dial line. 

• EOT (End -of Transmission ) is used to 
send the End-Of-Transmission signal to 
the remote CPU. on a non-switched 
line, there is no provision for reading 
a response from the remote CPU. On a 
switched line, Message Format Error and 
the appropriate bit in the Received . 
Byte of the Expanded BSC CCB (EOT, DLE 
EOT, or ENQ) is posted. 

• WAB T (W ait Before Transmitting ) sends 

the WAit- Before-Transmitting (WABT) 
sequence to the remote CPU and waits 
for a response, normally an ENQ. The 
problem program that reguests the delay 
may reissue CNTRL WABT if not yet ready 
to receive when the ENQ is received. 

• DSC (Disconnect ) is used, on a switched 
line, to indicate to the remote CPU 
that the connection is being broken 
(the line is being disabled) at this 
CPU. CNTRL Disconnect must be followed 
by BCLOS to disable the line. CNTRL 
Disconnect should not be used on a 
leased line. 

• ENQ (Inquiry) is used to bid for the 
line and initiate transmission by 
sending the ENQ control character. 
CNTRL ENQ normally precedes a WRITE 
macro. The expected response is ACK-9. 
When CNTRL ENQ elicits an outstanding 
acknowledgement from the remote CPU (i. 
e. , when a WABT has been received), the 
response may be ACK-0, ACK-1, or NAK. 

The line must be established (with BOPEN 
and, on a dial line, IDIAL) before issuing 
the CNTRL macro. 

The problem program must be sure that a 
CNTRL macro is complete by using the WAIT 
or WAITM macro instruction immediately 
following the CNTRL macro instruction. 

Upon completion of the CNTRL macro 
instruction, the problem program should 
check the normal completion bit in the BSC 
flag bytes of the CCB. If normal 
completion is not indicated, the problem 
program should check further in the 
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"completion" and "received" BSC flag bytes. 
(See Appendix M, Part 2) . 

BCLOS Macro 

Logical IOCS provides a unique macro 
instruction for completion of BSC 
processing. The BCLOS macro turns off the 
data adapter (SDA II) and clears the BSC 
flag bytes. Before disabling the adapter, 
BCLOS halts I/O on any command outstanding 
to the SDA II. BCLOS must be issued when 
all transmission on the line specified in 
dtfname is completed or when the problem 
program wishes to use BOPEN (and IDIAL) 
again with different parameters. 



i — — r - 

| Name( Operand 

I 1 


— i 

| Operand 


1 


| | BCLOS 
i ... i .,. ,, ._ 


H 

| dtfname 


1 

1 

„ ,_ ,, , i 



The problem program should check for the 
completion of BCLOS by using the WAIT or 
WAITM macro* 

ERRPT Macro 

When all data transmission is completed and 
end-of-job is reached, the problem program 
using BSC support macros must issue the 
ERRPT macro. ERRPT displays the error 
statistics: 

• Data Check 

• Lost Data 

• Intervention Reguired 

• Time Out 

• Unit Check 

and the count of total transmissions 
received for this job. These hexadecimal 
counts illustrate errors on the line or in 
the modern equipment. Regular display of 
the counts ensures maximum . throughput for 
the problem program through early detection 
of frequently occurring errors. 

ERRPT also performs functions essential 
to the proper termination of a BSC job. 
ERRPT removes the CCB from the CCB table 
(BTAB) kept in the supervisor. The CCB is 
entered in the table when a BOPEN macro is 
issued for the CCB, and is only deleted by 
ERRPT. Therefore, to avoid filling up the 
CCB table, ERRPT should be issued following 
the BCLOS macro for this CCB. 

i 1 1 1 

j Name| Operation! Operand | 

h- 1 1 — I 

| | ERRPT | dtfname | 
i _i i i 

The ERRPT macro should follow the BCLOS 
macro, and, at end-of-job, precede the EOJ 
macro. 



For more detailed information on the 
format of these messages, refer to IBM 
System/360 Bas ic- Operating Sys tem, Operator 
Messages , Form C24-5024. 

For a discussion of the WAIT and WAITM 
macros used for processing with BSC 
support, see Processing Records^wjth 
Physical IOCS , under WAIT Macro and WAITM 
Mac ro . 



PROCESSING RECORDS WITH PHYSICAL IOCS 

Records can be transferred to or from an 
input/output device by issuing physical 
IOCS macro instructions. These 
instructions relate directly to the 
physical IOCS routines and bypass all 
logical IOCS routines. Thus routines for 
such functions as blocking or deblocking 
records, performing programmed 
wrong-length-record checks, switching I/O " 
areas when two areas are used, and setting 
up Channel Command Words (CCW) are 
eliminated. Any of these functions that 
are reguired for a problem program must be 
provided by the user in his own 
programming. 

Physical IOCS routines control the 
transfer of data to or from the external 
devipe. These routines are: 

Start I/O 

Interruption 

Channel Scheduler 

Device Error 

Thus, physical IOCS macro instructions 
provide the user with the capability of 
obtaining data and performing non-data 
operations in I/O devices, by issuing only 
the I/O commands that he requests. For 
example, if he is handling only physical 
records, he does not need the IOCS routines 
for blocking and deblocking logical 
records. He can write his own routines to 
handle the characteristics of his data file 
logically. 

Three macro instructions are available 
to the programmer for direct communication 
with physical IOCS: CCB (Command Control 
Block), EXCP (Execute Channel Program) , and 
WAIT. These are explained in the following 
sections. Whenever physical IOCS macro 
instructions are used, the programmer must 
construct the Channel Command Words (CCW) 
for his input/output operations. He uses 
the assembler-instruction CCW statement for 
this. However, when using physical IOCS 
for 7-track tapes, the user need not write 
CCW's for setting the mode of the tape. 
Physical IOCS automatically performs this 
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function. He must also recognize and 
bypass checkpoint records if they are 
interspersed with data records on an input 
tape. 



CCB Ma cro 



... ... ... -|- T 

|Name jOp |Operand 

1 1 H 


1 

1 


| blockna me | CCB | SYSnnn, command- list-name, X » yyyy ' 

L . L 1 


1 

1 
1 



The CCB (Command Control Block) macro 
instruction must be issued once in the 
problem program for each I/O device that is 
controlled by physical IOCS macro 
instructions. It causes a command control 
block (Figure 33) to be created. This 
block is necessary to communicate 
information to physical IOCS so that it can 
perform desired operations (for example, 
start I/O) . The command control block also 
receives status information after an 
operation, and makes this available for use 
by the problem program. 

The CCB instruction must be labeled 
(Blockname) with a symbolic name. This 
name must be the operand in the EXCP and 
WAIT instructions, which must refer to the 
command control block. 

Two operands are reguired in this CCB 
instruction. A third operand is optional. 
The first operand specifies the symbolic 
unit (SYSnnn) for the actual I/O unit with 
which this control block will be 
associated. The name may be SYSRDR, 
SYSLST, SYSIPT, SYSOPT, SYSLOG, 
SYS000-SYS254. The actual I/O unit is 
assigned to the symbolic unit by a Job 
Control ASSGN card, or by the SYMUN macro 
instruction. 

The s econd operand (command-list-name) 
specifies the symbolic name of the first 
CCW to be used with this CCB. This name 
must be the same as the name specified in 
the assembler CCW statement that constructs 
the channel command word. 

The t hird operand (X'yyyy 1 ) may be used 
to set the bits of bytes 2 and 3 at 
assembly time. After the user determines 
which bits he wishes to set on, and which 
off, he enters the hexadecimal 
representation of the binary value that he 
wishes. The hexadecimal value must be 
preceded by X and enclosed in single 
guotes. For example, to set on byte 2, bit 
6, he would enter X'0400«. 

Only the last five bits of byte 2 are 
used by the problem program to communicate 
with physical IOCS, as shown in Figure 33. 



However, the user may also wish to set (at 
assembly time) some bits that IOCS normally 
sets during program execution. For 
example, if the user sets bit 6 of byte 3 
on at assembly time, he can cause the 
program to act as if the channel 9 overflow 
condition has occurred when he begins 
executing his program. 



From the specifications in this CCB 
instruction, the macro sets up an 8-byte 
command-control block (Figure 33) as 
follows: 

Bytes Contents 

0-1 The first two bytes are used for a 
chain field that physical IOCS uses 
for channel gueueing. After a 
record has been transferred, IOCS 
places the residual count in these 
two bytes. The problem program can 
use this to check ,the length of the 
record that was transferred. 

2-3 The next two bytes are used for 

transmission of information between 
physical IOCS and the problem 
program. (For example, the problem 
program can test byte 2, bit 1 to 
determine if the I/O device 
detected a wrong-length record when 
data was transferred.) 

All bits are set to a 0 (off) 
when the problem program is 
assembled unless the third operand 
is included in the CCB macro 
instruction. If the third operand 
is included,, all bits set by IOCS 
should be assembled as zeros (off) . 
During execution, each bit may be 
set at 1 (on) by the problem 
program or by a condition detected 
by physical IOCS. In byte 2, bits 
3 and 5-7 are turned on by the 
problem program. Any bits that are 
turned on, during program 
execution, by physical IOCS are 
reset by IOCS the next time an EXCP 
macro using the same CCB is 
executed. The condition indicated 
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by the setting of each bit is shown 
in Figure 34. 

4-5 Bit 0 of byte 4 is used to indicate 

that a program-controlled 
interruption has occurred. Like 
the bits in bytes 2 and 3 (see 
Figures 33 and 34) , this is used to 
transfer information from physical 
IOCS to the problem program. The 
other bits of bytes 4 and 5 are a 
hexadecimal representation of the 
symbolic unit for the I/O device, 
as specified in the first operand 
of this CCB instruction. 



-7 The last two bytes contain the 

address of the CCW (or first 
address of a chain of CCW's) 
associated with this CCB and 
specified symbolically in the 
second operand. 



For a description of the CCB, expanded 
for STR use, see: File De finition- Macros, 
Pro cessing with STR - Devices - (DTFSN , - DTFRF) . 
For description of the expanded BSC CCB, 
see: File Definition Macros, - Binary - 
Synchronous Communication ( DTFBS, DTFRF) . 
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Figure 33. Command Control Block (CCB) 
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Figure 34. Conditions Indicated by CCB Bytes 2, 3, and 4 
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EXGP Macro 



1 — T- 

|Name J 


— i — 
Op | 
— Y- 


Operand | 


1 h 

1 1 
• ■ 


EXCP | 

— L_ 


blockname j 



The EXCP (execute channel program) macro 
instruction reguests physical IOCS to start 
an input/output operation for a particular 
I/O device. The symbolic name (blockname) 
of the CCB established for the device is 
the only operand reguired in this 
instruction. 

Physical IOCS determines the device 
concerned, from the command control block 
specified by blockname , and either starts 
the device or places the command control 
block (CCB) in a channel gueue. Program 
control is then returned to the problem 
program. If the CCB is in a gueue, the 
actual transfer of data will be started at 
some later time, when the CCB reaches the 
top of the gueue. 



WAIT Macro 

i 1 1 

|Name | Op | Operand 

j j 1 

| | WAIT | blockname 
i . i i 



This WAIT or WAITM macro instruction is 
issued whenever the program reguires that 
an I/O operation, started by an EXCP 
instruction, be completed before execution 
of the problem program continues. For 
example, the transfer of data (a physical 
record) to main storage must be completed 
before that data can be added, moved to 
another area of main storage , or otherwise 
processed. When this WAIT instruction is 
executed, the program enters a waiting loop 
until the related CCB indicates that the 
associated input/output operation is 
finished. Then programming automatically 
continues, and the data can be processed. 
The WAIT (or WAITM) macro should be issued 
to check for the completion of BSC support 
macros. 

The symbolic name (blockname) of the CCB 
established for the I/O device is the only 
operand reguired in this instruction. This 
is also the same name as that specified in 
the EXCP instruction for this device. When 
using ST E macro instructions, the symbolic 
name (blockname) of the CCB is referred to 
as "dtfnameB", where dtfname is the 
symbolic name of the DTFSN macro. When 
using BSC macro instructions, the symbolic 
name (blockname) of the CCB is referred to 



as "dtfnameD," where dtfname is the 
symbolic name of the DTFBS macro. 



WAITM Macro 



i \ 1 1 

| Name | Op | Operand | 

1 H -I 1 

| | WAITM | blocknamel , blockname2 . . . . I 
|| j blocknamen, reg | 
i 1 1 1 



This macro is used with both physical IOCS 
and logical IOCS for STR devices or for BSC 
support. The WAITM macro instruction 
allows the problem program to wait on the 
completion of one of several specified I/O 
operations. When the WAITM macro is 
executed, the problem program enters a 
waiting loop until the traffic bit in. any 
one of the specified CCB's indicates that 
the associated I/O operation is completed. 

If the problem program is using physical 
IOCS, "blockname" is the symbolic name of 
the CCB. For STR devices an expanded CCB 
is generated by the DTFSN macro. The 
blockname for a DTFSN CCB must .be 
referenced in the operand field of a WAITM 

(or WAIT) macro as "dtfnameB" (where 
dtfname is the symbolic name of the DTFSN) . 
The maximum number of blocknames that can 
be specified is 17. For BSC support, the 
expanded CCB is generated by the DTFBS 
macro. The blockname for a BSC CCB must be 
referenced in the operand field of a WAITM 

(or WAIT) macro as "dtfnameD" (where 
dtfname is the symbolic name of the DTFBS 
macro) . 

The last operand (reg) is a general 
register number (2-11). The address of the 
associated CCB (dtfnameB) is loaded into 
this register upon completion of an I/O 
operation. 

The WAITM macro must be issued to check 
for completion of a SOPEN, READ, WRITE, or 
CNTRL macro, when the problem program uses 
these macros with respect to STR I/O 
operations. WAITM (or WAIT) should also be 
issued to check for the completion of BSC 
support macros. 



CHNG Macro 
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This macro instruction is used with both 
logical and physical IOCS. It is described 
in the group included under Processing 
Records Consecutively . 
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WRITING CHECKPOINT RECORDS 

When a problem program is expected to run 
for an extended period of time, provision 
should be made for taking checkpoint 
records periodically during the run. These 
records contain the status of the job and 
the system at the time records are written. 
Thus, they provide a means of restarting at 
some midway point rather than at the 
beginning of the entire job, if processing 
must, be terminated for any reason before 
the normal end of job. For example, a job 
of higher priority may reguire immediate 
processing, or some malfunction such as a 
power failure may occur, and cause such an 
interruption. 

If checkpoint records are written 
periodically, operation can be restarted by 
using the last set of checkpoint records 
written previous to the interruption. 
Therefore the records must contain 
everything needed to re-initialize the 
system when processing is restarted. 
Checkpoint records can be written by 
issuing a CHKPT macro instruction in the 
problem program. Restarting jobs, for 
which checkpoint records have been written 
by use of the CHKPT macro, is performed by 
the Job Control program. Job Control is 
described in the Programmer's Guides , as 
listed on the front cover of this 
publication. 

Each time CHKPT is executed, several 
records are written on- disk or tape. If 
the object program is executed in a 
disk-resident system, the checkpoint 
records may be written in the checkpoint 
area of the system disk pack or on tape. 
When they are written on disk, each set of 
checkpoint records replaces the previous 
set so that the most recent is always 
available for restarting the job. When 
checkpoint records are written on tape, an 
additional set is written each time CHKPT 
is executed. Thus all the sets of 
checkpoint records for a particular run are 
saved. Each set should be identified so 
that the set to be used for restarting can 
be identified. If a disk-resident system 
is not used for execution of the object 
program, the checkpoint records must be 
written on tape. The disk/tape checkpoint 
records contain information such as: 

• Header information: ///CHKPT//nnnnxxxx 
where nnnn is information used by the 
restart program, and xxxx is the user's 
identification (usually a. number) of 
the set of checkpoint records. Before 
each set is written, this 
identification should be changed by the 
user. On the restart, this identifies 
the set of checkpoint records to be 
■used. This record is not written when 



checkpoint records are written on the 
system pack. 

• The contents of the general registers 
are saved. The contents of the 
floating-point registers are not saved. 

• The contents of the Supervisor 
communication region, except the first 
10 bytes. 

• A table of restart information, such as 
the starting point in the problem 
program and the positions of the 
input/output data tapes within the 
logical file. 

• The problem program and data in process 
at this time. This includes all main 
storage above the supervisor, depending 
on the size specified in the 
configuration byte (9) of the 
communication region. 

• Trailer information, when checkpoint 
records are written on tape. The 
trailer is identical to the header 
label. 



CHKPT Macro 

i 1 

| Op | Operand 

| 1 

| CHKPT | n, rest art- name, SYSnnn,DISK 



The CHKPT (checkpoint) macro instruction 
causes checkpoint records to be written. 
The instruction reguires either three or 
four operands, depending on whether the 
object program is to be executed in a 
disk-resident system. 

The first operand specifies the number 
(n) of tape reels of input/output data that 
will have to be properly positioned when 
the job is restarted. The output tape used 
for writing the checkpoint records must not 
be included in this count. For all other 
tape drives, the macro routines save both 
the address of the symbolic unit for the 
drive and the block count that has been 
accumulated at the time the checkpoint 
records are written. Block count -is the 
number of blocks of data (physical tape 
records, from gap to gap) that have been 
read or written. When the job is 
restarted, the block count is used to 
position the tape properly to continue with 
the data yet to be processed. If the 
object program does not include the 
processing of any input/output data that is 
recorded on tape, the comma must be entered 
first in the operand field of the CHKPT 
macro instruction. 
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The s econd oper and (Restart-name) 
specifies the symbolic name of the 
problem- program statement at which 
programming is to restart if an 
interruption occurs and processing must be 
continued at some later time. 



The t hird operand specifies the symbolic 
unit (SYSnnn) for the tape drive on which 
the checkpoint records are to be written, 
if they are to be recorded on tape rather 
than disk. When an interrupted job is 
restarted, this same symbolic unit, must be 
specified in the Job Control RSTRT card. 
If the checkpoint records are to be written 
on disk, SYSRES must be specified. 



When checkpoint records are written on 
tape, they may be written on a separate 
tape drive, or they may be interspersed 
with data records in an output tape file. 
When the symbolic unit (SYSnnn) is assigned 
to the same drive used as an output file 
defined by logical IOCS, checkpoint records 
are written on this drive regardless of 
whether an alternate drive is assigned by 
the DTFSR entry ALTTAPE . The CHKPT macro 
will not write checkpoint records on the 
alternate drive. If checkpoint records are 
interspersed with data records in an output 
tape file, they can be bypassed on input by 
use of the DTFSR entry CKPTREC. 

When checkpoint records are written on 
7-track tape,, the Data Conversion special 
feature must be used. 

The f ourth operand (DISK) indicates that 
checkpoint records are to be taken for an 
object program executed in a disk-resident 
system. Other-wise, it is omitted and the 
macro instruction contains only three 
operands. 

Issuing a CHKPT macro instruction in the 
problem program causes the macro-library 
checkpoint routines to be assembled at the 
same time as the problem program. If the 
user's object program is to be executed in 
a disk-resident system (DISK specified as 
the fourth parameter in the CHKPT macro 
instruction) , the checkpoint routines must 
be stored in the core-image library on the 
system-residence disk pack. They are 
transferred from system residence to the 
Supervisor transient area in main storage 
whenever the CHKPT macro is to be executed. 
If a disk-resident system is not to be used 
for execution of the object program (DISK 
not specified in this instruction) , the 
checkpoint routines are assembled with the 
user's problem program. In either case 
(disk-resident system, or not) the CHKPT 
instruction, if used, must be issued only 
once so that the routines are assembled 
only once per program assembly. 



The checkpoint routines use registers 1 , 
14, and 15. It is the user's 
responsibility to save the contents of 
these registers if the problem program also 
uses them. 

When the object program is to be 
executed in a disk-resident system, issuing 
the CHKPT macro instruction in the source 
program causes a supervisor-call 
instruction with code 1, and a statement 
with the program name SYSCPT or SYSCPD, to 
be assembled (see Supervisor-Communic ation 
Macros: FETCH ) . During execution, the 
supervisor-call interruption routine 
analyzes the code and fetches the 
checkpoint routines from residence to the 
transient area. When a disk-resident 
system is not used for program execution, 
checkpoint routines are assembled in line. 

Included with the assembled checkpoint 
routines (for a disk-resident system, or 
not) is a table of restart information. 
This table may contain such information as 
the checkpoint identification, the restart 
address, and information about the tape 
drives used by the problem program. For 
example, issuing a CHKPT instruction such 
as: 

CHKPT 3,STHERE,SYS004 

causes this table to be assembled: 

S tatements Notes 

SYSCHKPT DC CUP « (4blanks) 1 

DC Y(STHERE) 2 

DC 3FL*P0' 3 

Notes: 

1. This statement provides four bytes for 
the checkpoint identification. It is 
the user's responsibility to move 
updated identification to these four 
positions before each set of checkpoint 
records is written. For example, he 
might move CR01 (Checkpoint Record 1) 
to SYSCHKPT for the first set, CR02 for 
the second, etc. Each time checkpoint 
records are written, this is part of 
the recorded table of restart 
information. Then when the job is 
restarted after an interruption, the 
programmer indicates which set of 
checkpoint records is to be used by 
specifying the identification in the 
Job Control RSTRT card. The tape 
containing the checkpoint records is 
searched, and the identified set of 
records is read from the tape. 

2. The symbolic restart-name, STHERE 
(start here) in this case, is assembled 
in this macro-library statement. If 
the user wants to restart at a 
different location than that specified 
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in his macro instruction, he can move 
the address of that location to 
SYSCHKPT+4 



3. The DC statement defines a full word 
(four bytes) constant for each 
input/output data file. In this case, 
three constants are assembled because 
3is specified as the first operand in 
the CHKPT instruction. These constants 
provide an area to store information 
for properly positioning the 
input/output data tapes when the job is 
restarted after an interruption. The 
first two bytes of each statement 
contain the address of the symbolic 
unit for the corresponding tape drive. 
The second two bytes contain the block 
co un t for the corresponding file. 
Usually when logical IOCS is used for a 
file of records, the user does not have 
to refer to these fields* The IOCS 
routines move the symbolic unit address 
before the checkpoint records are 
written. They also increment the block 
count (if DTFSR CHECKPT specified) 
whenever a GET or PUT requires an 
actual I/O operation. If the user 
(instead of IOCS) is supplying 
information for certain files, he must 
not use those 4-byte fields that are 
specified for files maintained by 
logical IOCS (see DTFSR CHECKPT ) . 



The user must supply both 
the address and the block count whenever: 



a file with nonstandard labels is 
read backwards. 



• an unlabeled file is read 
backwards. 



• a file is processed by physical 
IOCS macro instructions. 

The block count that he supplies must 
be relative to the beginning of the 
file, regardless of whether the file is 
read forward or backwards. 

To supply the address information, 
the user can move the addresses of the 
symbolic units from the Command Control 
Blocks (CCB) associated with the files 
(see Processing Recor ds with Physical 

IOCS : _CCg)_. He would^have issued 

three CCB's, one for each file, perhaps 
as follows: 

BL0CK1 CCB SYS001,CCW1 
BL0CK2 CCB SYS002,CCW2 
BL0CK3 CCB SYS003,CCW3 



To move the addresses in this case, he 
could write these statements: 

MVC SYSCHKPT+6 (2) ,BL0CK1+4 
MVC SYSCHKPT+10 (2) ,BLOCK2 + 4 
MVC SYSCHKPT+ 1 4 (2) , BL0CK3+4 

For the block count, the user must 
increment (or decrement, on a backspace 
order) the count each time an EXCP 
macro that results in tape movement is 
executed. The instructions to add to 
(or subtract from) the block count must 
precede the EXCP instruction in the 
user's program. For the first file, 
they might be: 

LH R,SYSCHKPT+8 

LA R , 1 (R ) 

STH R,SYSCHKPT+8 

EXCP BLOCK 1 

A block count must not be supplied 
in the restart table for the output 
file that contains both data and 
checkpoint records, however. In this 
case the tape is positioned, on 
restart, at the first data record 
following the set of checkpoint records 
that are used for restarting. 



COMPLETION 

After all the records for a logical output 
file have been processed (end-of-file) , 
that file must be deactivated by an 
instruction in the problem program to close 
the file. When the end of a logical input 
file in an I/O unit other than disk or tape 
is sensed, IOCS immediately branches to the 
user's end-of-file routine (specified by 
DTFSR EOFADDR) where the instruction to 
close the file can be issued. When the end 
of a disk or tape input file is sensed, 
IOCS checks standard trailer labels (if 
any) , makes provision for user-checking of 
user labels, and then branches to the 
user's end-of-file routine (specified by 
EOFADDR) where the file may be closed. A 
CLOSE macro instruction is available to the 
programmer for closing each input and 
output file. 

An end-of-volume condition (EOV) , rather 
than air 'end-of-file condition (EOF), can 
occur during the processing of records in a 
logical file on disk or tape.. An EOV 
condition means that the processing of all 
the records on one volume (disk pack or 
tape reel) has been completed, but that 
more records for the same logical file are 
recorded on another volume. When this 
occurs, IOCS checks or writes standard 
labels (if any) on the completed volume 
(trailer labels) and on the next volume 
(header labels) , makes provision for 
user-processing of user-standard labels on 
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both volumes, and then makes the data 
records on the next volume available for 
processing. Because IOCS detects the 
end-of-volume condition and utilizes many 
of the routines established for opening and 
closing files, no problem- program 
instructions are reguired specifically for 
an EOV condition. However, if the program 
reguires that the processing of tape 
records on one volume be ended before the 
actual end of the volume is reached, an 
end-of-volume condition can be forced. An 
FEOV (forced end-of-volume) macro 
instruction is provided for this condition 
in tape files. 

When an EOV or FEOV condition is 
detected in a logical file on tape, IOCS 
increases the volume sequence number (in 
storage) by _1. Thus, this number is 
updated for checking/writing the header 
label on the next reel. (For a description 
of tape labels, see the Programmer' s 
Guide . ) IOCS also updates the active drive 
number if an alternate tape drive has been 
specified (see DTFSR ALTTAPE) . 

The specific functions that occur on an 
EOF or EOV condition for a disk or tape 
file vary with the type of operation (input 
or output) and with the use of file labels. 
These functions are discussed in the 
following sections. 

Disk Input File 

When records in a logical input file on 
disk are processed in consecutive order 
(specified by DTFSR) or in seguential order 
by key (specified by DTFIS) , IOCS detects 
an end-of-file condition. The end of the 
input file is determined either by the 
ending address of the last extent specified 
for the file in Job Control XTENT cards, or 
by an end-of-file record read from. the data 
file. With seguential processing (DTFIS), 
IOCS immediately branches to the user's 
end-of-file routine (specified by EOFADDR) . 

When records are processed in 
consecutive order (DTFSR), the file may 
contain user trailer labels. In this case 
IOCS branches first to the user's label 
routine (specified by LABADDR) where the 
user may check his trailer labels. Up to 
eight trailer labels can be read and 
checked. They are written on the first 
track of the first extent specified for the 
file on each pack. The trailer labels 
follow the user header labels for the pack, 
and they are identified by UTLO, UTL1, 

- UTL7. When IOCS branches to the 

user's label routine, it also reads the 
trailer label and makes it available to the 
user for checking. IOCS sets up a label 
area and supplies the address of the area 
to the user in Register 1, After each 
label is checked, the user returns to IOCS 



by use of the LBRET macro. After all 
trailer labels have been checked, IOCS 
branches to the user's end-of-file routine 
(specified by EOFADDR) . 

IOCS detects end - of-volum e conditions in 
a disk input file. The end of a volume is 
recognized when all extents on one volume 
have been processed but Job Control XTENT 
cards have specified additional extents on 
another pack. At the end of a volume, IOCS 
allows the user to check his trailer labels 
(if any) , the same as at the end of a file. 
IOCS then checks the standard header labels 
on the next volume, allows the user to 
check any user header labels by branching 
to the address specified by LABADDR, and 
makes the first record in the first extent 
available for processing. 

Disk Output File 

When disk records are processed 
consecutively (DTFSR) or loaded 
sequentially by key (DTFIS) , and when all 
records for the logical file have been 
completed, the CLOSE instruction is issued 
and normal EOF procedures are initiated 
(see CLOSE Macro ) . If the end of the last 
extent specified for the file is reached 
before CLOSE is issued, IOCS assumes an 
error condition. 

End-of-volume conditions in a disk 
output file are detected in the same way as 
in a disk input file. At the end of a 
volume IOCS allows the user to write his 
trailer labels (if any) , the same as at the 
end pf a file (see C LOSE - Macro ) . IOCS then 
writes standard header labels on the next 
volume, allows the user to write any user 
header labels by branching to the user's 
label routine (specified by LABADDR) , and 
permits the processing of output data 
records to continue. 

Tape Input File 

When logical IOCS senses a tape mark on a 
tape input file, either an end-of-file or 
end-of-volume condition exists. The 
EOF/EOV condition is determined by IOCS or 
by the user (depending on the type of 
labels used for the file) and the 
appropriate functions are performed. 

If standard labels are specified, IOCS 
immediately reads and checks the standard 
trailer label. If user labels are also 
present and are to be checked (specified by 
DTFSR LABADDR), the user's routine is then 
entered for each user label that is read 
(see OPEN Macro ) . After all labels have 
been checked, the rewind option is 
executed, as specified in DTFSR REWIND. 

When the standard trailer label is 
checked, either an EOV or EOF condition is 
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sensed. When an EOV identifier is sensed, 
IOCS switches to the alternate tape drive 
(if one is specified in the DTFSR entry 
ALTTAPE) after user labels have been 
checked if specified. If an alternate 
drive is not specified, the operator is 
notified to change the tape reels and the 
system enters the wait state. When the 
operator has mounted the new reel and 
pressed either the request key (on the 
1052) or the interruption key (on the 
console) / processing resumes. IOCS checks 
the header label (s) if checking is 
specified, and normal processing continues. 
If an input file is processed by physical 
IOCS (DTFPH specified) , the user must issue 
an OPEN instruction for the new reel. Then 
IOCS checks the header label and processing 
continues. 

When an EOF condition is sensed, IOCS 
branches to the programmer's e'nd-of-file 
routine, specified by the DTFSR entry 
EOFADDR. 

If the tape input file has nonstandard 
labels, IOCS immediately branches to the 
user's label routine (specified by DTFSR 
LABADDR) when the tape mark is sensed. In 
his routine, the programmer must use 
physical IOCS macro instructions to read 
his label (s). Furthermore he must 
determine the EOF/EOV condition and 
indicate this to IOCS by loading either EF 
(end-of-f ile) or EV (end-of- volume) in the 
two low-crder bytes of Register 0. On an 
EF condition, IOCS branches to the users 
end-of-file address (specified by DTFSR 
EOFADDR) when the problem program returns 
to IOCS at the end of the label routine. 
On an EV condition, IOCS initiates the 
end-of-vclume procedures to close the 
completed volume and open the next volume 
for processing. 

If a tape file is n ot labeled (DTFSR 
FILABL=NO) or contains labels that are not 
to be checked (DTFSR FIL ABL= NS TD) , IOCS 
branches to the end-of-file address when 
the tape mark following the last data 
record is sensed. If an end-of- volume 
condition exists instead of an end-of-file 
condition, the user may indicate this by 
issuing an FEOV macro instruction in his 
end-of-file routine. If an alternate tape 
drive is specified by the DTFSR entry 
ALTTAPE, IOCS switches to the alternate 
drive and processing resumes. If an 
alternate tape drive is not specified, the 
operator is notified to change the tape 
reels, and the system enters the wait 
state. When the new tape reel has been 
mounted, the operator must press either the 
request key on the 1052 or the interruption 
key on the console to resume processing. 

Whenever an input tape is read backwards 
(BAC K specified in DTFSR READ) , an 



end-of-file condition always exists when 
the file header label is reached. That is, 
backwards reading is confined to one 
volume. Therefore, with stand ard labels , 
the input/output routines check only the 
block count, which was stored from the 
trailer label, and then branch to the 
specified end-of-file routine. When 
physical IOCS macros are used to read 
records backwards, labels cannot be checked 
(DTFPH must not be specified) . For tape 
files with nonstandard k labels, IOCS 
branches to the user's label routine 
specified by DTFSR LABADDR where he may 
check the header label. He must use 
physical IOCS macro instructions to read 
the label (s) for checking. 



Tape Output File 

When an end-of-reel reflective marker is 
sensed on an output tape, logical IOCS 
prepares for closing the file by ensuring 
that all records have been written on the 
tape.- If the programmer issues another 
PUT, indicating that more records are to be 
written on this output file, normal 
end-of-volume (EOV) procedures are 
initiated. If the programmer issues a 
CLOSE, the EOF procedures are initiated. 



The programmer should be aware that, 
under certain conditions, a truncated block 
of records may be written at an EOV or EOF 
condition, even though the file is defined 
as having fixed-length blocked records. 
When this file is used for input , the 
System/360 logical IOCS will recognize and 
handle these short blocks without the 
programmer being concerned or aware of this 
condition. 

Labeling procedures for the EOV 
condition closely follow those described 
under CLOSE Macro . The label is coded EOV 
rather than EOF, and only one tape mark is 
written after the label set, or after the 
data if standard labels are not used. 



Forced End-of-Volume : Tape Files 

In some cases a programmer may need to 
force an end-of-volume condition at a point 
other than the normal tape mark (input) or 
reflective marker (output) . He may want to 
discontinue reading or writing the records 
on the present volume, and continue with 
those records for this same logical file 
that are recorded on the next volume. This 
may be necessary because of some major 
change in the category of records or in the 
processing reguirements. An FEOV (forced 
end-of-volume) macro instruction is 
available to the programmer for this 
function. 
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CL OSE Ma cro 
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ICLOSE | filename | 

ICLOSE | f ilenamel ,f ilename2,f ilename3, j 
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The. CLOSE instruction is used to deactivate 
any file that was previously opened in any 
input/output unit in the system: card 
reader, card punch, magnetic tape unit, 
disk drive, paper tape reader, printer, 
optical roll reader, or display unit. The 
symbolic name of the logical file, assigned 
in the DTFSR, DTFDA, DTFIS, or DTFPH header 
entry, is reguired in this instruction. As 
many as 16 files jnay be closed by one 
instruction, by entering additional 
filename parameters. CLOSE is reguired 
whenever logical IOCS macro instructions 
are used to transfer data. When physical 
IOCS is used, CLOSE is reguired only if 
standard labels on magnetic tape are to be 
written. A file may be closed at any time 
by issuing this macro instruction. 

Reopening a Closed File : If further 
processing of a. closed file is reguired at 
some later time in the program, the file 
must be opened again. If a file of disk 
rec o rds is reopened after a CLOSE, the 
label processing and extents made available 
depend on the type of processing that is 
specified for the file. When an input file 
is processed in consecutive order (DTFSR 
specified), IOCS checks the label (s) on the 
first pack and makes the first extent 
available, the same as at the original 
OPEN. When a file is processed by physical 
IOCS with SINGLE specified in DTFPH MOUNTD, 
IOCS opens the next extent specified by the 
user's XTENT cards. When a file is 
processed by the direct access method 
(DTFDA specified) , by the indexed 
seguential system (DTFIS specified) , or by 
physical IOCS with ALL specified in DTFPH 
MOUNTD, all label processing is repeated 
and all extents are again made available. 

If a file of tape records is closed, the 
tape is positioned in accordance with the 
REWIND specification. Therefore to resume 
processing of tape records at the point 
where CLOSE occurred, NORWD should be 
specified in DTFSR REWIND. When OPEN is 
issued later for additional records on that 
reel, the first record read must be a file 
label if standard labels are specified for 
the tape file being opened. If the tape 
file being opened is unlabeled or contains 
nonstandard labels, it is the user's 
responsibility to identify the first record 
read as a data record or a file label. 
When a file being reopened is a multireel 
file with standard labels, IOCS expects 
that the reel available for the OPEN is the 



same reel, on the same drive, that was in 
process when CLOSE was executed. If not, a 
message is issued. 

In addition to the registers used by 
logical IOCS, CLOSE also uses register 5. 
The programmer may use register 5 because 
the CLOSE macro routine saves and restores 
this register. However, if the programmer 
plans to use register 5 as a base register, 
he should be aware that register 5 is 
dropped at the end of the CLOSE routine. 

Disk Files 

When disk records are processed in random 
order (specified by DTFDA or DTFIS) , the 
CLOSE instruction is issued in the problem 
program to deactivate the file after all 
records have been processed. 

When records in a disk input file are 
processed in consecutive order (DTFSR) or 
in seguential order (DTFIS) , the CLOSE 
instruction is generally issued in the 
user's end-of-file routine (specified by 
EOFADDR) to deactivate the file. IOCS 
branches to this routine when it detects an 
end-of-file condition (see Completion ) . 

When records in a disk output are 
processed in consecutive order (DTFSR) or 
loaded in seguential order (DTFIS) , the 
CLOSE instruction is issued after all 
records for the file have been processed. 
It writes any record, or block of records, 
that has not already been written. If a 
record block is partially filled, it is 
truncated; that is, a short block is 
written on disk. CLOSE causes one or more 
functions to be performed before it 
deactivates the file* It always writes an 
end-of-file trailer record after the last 
data record in the file. If records are 
processed in consecutive order, user 
trailer labels may be written if the DTFSR 
entry LABADDR is included in the file 
definition. 

Up to eight trailer labels can be 
written on the first track of the first 
extent specified for the file on each pack. 
They follow the user-standard header labels 
for the pack and are identified by UTLO, 

UTL1, UTL7. For this operation, IOCS 

branches to the user's label routine, sets 
up a label area, and supplies the address 
of the area in Register 1. In his routine 
the user constructs the trailer label and 
then returns control to IOCS by use of the 
LBRET macro. IOCS then writes the trailer 
label. Similar to writing user header 
labels, these steps are repeated until 
eight trailer labels have been written or 
until the user indicates that he does not 
reguire any more labels, whichever occurs 
first (see OPEN Macro : Disk Output File» 
Writing Additional User-Standard Header 
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Labels) . After the last trailer label is 
written, CLOSE deactivates the file. 

Tape Input Fi^le 

When an input file recorded on magnetic 
tape is processed, CLOSE is generally 
issued in the user's end-of-file routine. 
It initiates rewind procedures for. the tape 
as specified in the DTFSR entry REWIND. It 
then deactivates the file. 

If CLOSE is issued for any tape input 
file before the end of the data is reached, 
the tape is rewound as specified by the 
DTFSR entry REWIND, and the file is 
deactivated. No labels are read or 
checked. 

Tape Output , File 

For a magnetic tape output file, CLOSE is 
issued when all records for the file have 
been processed. It writes any record, or 
block of records, that has not already been 
written. If a record block is partially 
filled, it is truncated; that is, a short 
block is written on the tape. Following 
the last record, a tape mark is written. 
If labels are not specified, a second tape 
mark is written and the tape is rewound as 
specified in DTFSR REWIND. 

When standard lab els are specified (STD 
in DTFSR FILABL or OUTPUT in DTFPH 
TYPEFLE) , CLOSE causes the file trailer 
label to be completely written after the 
tape mark. The E0F1 indication, the block 
count accumulated during the run, and the 
header-label information (with HDR 1 
replaced by E0F1) are included in the 
trailer label. 

IOCS accumulates the block count for the 
trailer label whenever logical IOCS (DTFSR) 
is used for an output file. When physical 
IOCS (DTFPH) is used, however, the problem 
program must accumulate the block count, if 
desired, and supply it to IOCS for 
inclusion in the standard trailer label. 
For this, the count (in binary form) must 
be moved to the 4-byte field that is 
labeled f ilenameB . For example, if 
filen ame specified in the DTFPH header 
entry is DETLOUT, the block count field is 
addressed by DETLOUTB; if filename is DETL, 
the field is addressed by DETLB. The user 
must define this address as an address 
constant . 

If checkpoint rec ords are interspersed 
with data records on an output tape, the 
block count accumulated by logical IOCS 
does not include a count of the checkpoint 



records. Only data records are counted. 
Similarly if physical IOCS is used, the 
problem program must omit checkpoint 
records and count only data records. 

If user-standard lab els (UTL) are to 
follow the standard trailer, the CLOSE 
routine branches to the user's routine 
(identified by DTFSR or DTFPH LABADDR) 
after the standard label has been written. 
Upon entry to the user's routine, IOCS 
supplies Code F in the low-order byte of 
Register 0 to indicate that an end-of-file 
trailer label should be built (see D TFSR 
LABA DDR ) . In his routine the programmer 
can build a maximum of eight user-standard 
labels, which the CLOSE routine writes for 
him. After building each user-standard 
label, he must return to the CLOSE routine 
by use of the LB RET macro. 

After all trailer labels are written, 
the CLOSE routines write two tape marks, 
execute the rewind option, and deactivate 
the file. 

For the proper procedures to handle 
user-standard labels and/or nonstan dard 
labels, see OPEN Ma cro: T ape Ou tput File. 

Other Files 

When the last paper tape or card input 
record has been read, IOCS branches to the 
user's end-of-file routine where CLOSE is 
generally issued. 

When a printer or card output file is 
completed, CLOSE must be issued for that 
file. Any record in the output area that 
has not been printed, -displayed, or punched 
is transferred to the output file before 
the file is deactivated. 

For a discussion of the SCLOS macro, for 
the STR adapter, see Processing with STR 
Devices . For a discussion of the BCLOS 
macro, for the BSC adapter, see Binary 
Synchronous Communication . 

LBR ET Macro 
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The LBRET (label return) macro instruction 
is issued at the end of the user's label 
routine to return to IOCS. This macro is 
described under Initia lizat ion: LBRET 
Macro. 
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FEOV Macro: Tape Records 

i 1 1 1 1 

|Name | Op | Operand | 

I 1 1 1 

| | FEOV | filename | 
i i i i 

The FEOV (forced end-of- volume) macro 
instruction is used for either input or 
output files on tape to force an 
end-of-volume condition when neither a tape 
mark nor a reflective marker has been 
sensed. This indicates that processing of 
records on one volume is considered 
finished, but that more records for the 
same logical file are to be read frcm or 
written on the following volume. 

The FEOV macro cannot be issued in the 
user's EOF routine when the FEOV refers to 
the same file that caused entry to the EOF 
routine, except for an unlabeled file or 
for a nonstandard labeled file with no user 
label address specified. 

The symbolic name of the file, specified 
in the DTFSR or DTFPH header entry, is the 
only parameter reguired in this 
instruction. 

When logical IOCS macro instructions are 
used for a file (DTFSR specified) , FEOV 
initiates the same functions that occur at 
a normal end-of-volume condition, except 
trailer- label checking. For an input tape, 
it immediately rewinds the tape as 
specified by DTFSR REWIND and provides for 
a volume change as specified by DTFSR 
ALTTAPE. Trailer labels are not checked. 
FEOV then checks the standard header label 
on the new volume, and provides for 
user-checking of any additional 
user-standard header labels if DTFSR 
LABADDR is specified. If nonstandard 
labels are specified (DTFSR FILABL=NSTD) , 
FEOV provides for user-checking if desired. 
For an output tape, FEOV writes the last 
block of records if necessary (this may be 
a short block) and writes a tape mark. 
Then it writes the standard trailer latel 
and additional user-standard labels (if 
any) , writes one tape mark, provides for a 
volume change, and writes the file header 
label (s) on the new volume, as specified in 
the DTFSR entries REWIND, ALTTAPE, FILABL, 
and LABADDR. If nonstandard labels are 
specified, FEOV provides for user-writing 
of trailer labels (completed volume) and 
header labels (new volume) , if desired. 

When physical IOC S macro instructions 
are used and DTFPH is specified for 
standard label processing, FEOV may be 
issued for an output file only. In this 
case FEOV writes the standard trailer 
label, and any additional user-standard 
trailer labels if DTFPH LABADDR is 



specified. When the new volume is mounted 
and ready for writing, IOCS writes the 
standard header label and additional 
user-standard header labels, if any. 



FILE DEFINITION MACROS 

Whenever logical IOCS macro instructions 
(GET, PUT, READ, WRITE, etc) are used in a 
program to control the input/output of 
records in a file, that file must be 
defined by. a declarative macro instruction. 
The parameters of the macro instruction are 
punched in a set of entry cards. Each 
parameter uses the keyword format (see 
Mac ro In s truc tio n Form a t) ♦ In addition to 
describing the file, the parameter entry 
cards indicate the type of processing for 
the file, and specify symbolic names of 
main-storage areas and routines used by the 
file. 

When physical IOCS macro instructions 
(EXCP, WAIT, etc) are used for a file, a 
declarative macro instruction is reguired 
only if disk or tape files with standard 
labels are to be processed. No other files 
reguire definition. 

The file definition macros for all files 
in a problem program must be assembled with 
that problem program. The logical IOCS 
routines that the problem program will 
reguire during its execution are assembled 
from the specifications in the file 
definitions. A separate set of parameter 
entry cards is included for the definition 
of each logical file, and the sets may be 
placed in any order. If the problem 
program is to be executed in a 
disk-resident system, a beqin-def inition 
card (DTFBG macro statement) must precede 
the first set of file definition cards. In 
all cases, regardless of where the program 
will be executed, an end-of-def inition 
card (DTFEN macro statement) must follow the 
last set. At program assembly time, the 
entire group of file definition cards 
(punched in assembler-card format) is 
placed in the card deck immediately after 
the START card and ahead of any of the 
user's source program. The user's source 
program starts after the end-of-def inition 
card (DTFEN) . 

Five different file-definition 
declarative macros (DTFSR, DTFDA, DTFRF, 
DTFSN, and DTFIS) are available for 
defining files processed by logical IOCS, 
and one macro (DTFPH) for files processed 
by physical IOCS. For logical IOCS 
operations, the file-definition macro to 
use for a file depends on the type of 
processing that will be performed for that 
file: 
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Consecutive Processing . This applies to 
input/output files in serial devices, or on 
2311 disk when records are processed 
consecutively. The DTFSR (Define The File 
in a Serial-type device) macro is used. 

Direct Access Method . Whenever a 
logical disk file is to be processed 
randomly, the direct-access-method macro 
DT FDA is used. 

Indexed Sequential System . When a 
logical disk file is to be organized or 
processed by the indexed sequential file 
management system (ISFMS) , the DTFIS macro 
is used. 

P rocessing w ith S TR devices . Where STR 
devices are used, the adapter must be 
defined by the macro, DTFSN. 

Binary Synchronous Communication . Where 
BSC support macros are to be used, the data 
adapter (SDA II) must be defined by the 
DTFBS macro. 

The first card of a file-definition 
macro instruction is called a header card, 
and the continuation cards are called 
det ail entry cards. The header card is 
punched with: 

• The symbolic name of the file in the 
name field . This is the name that must 
be specified in any logical IOCS macro 
instructions that refer to this file in 
the user's program. The symbolic file 
name may be up to seven characters long 
in a DTFSR, DTFDA, or DTFPH macro 
header card. In a DTFIS macro header 
card, the name may be up to five 
characters long. 

DTFIS filenames should be unigue to 
each other if the program phases are to 
be stored permanently in the core image 
library. This will prevent one phase 
from being overlaid by another with the 
same filename. (For further 
information on the core image library, 
see the Programmer 1 s Guide listed on 
the front cover of this publication.) 

• The macro mnemonic operation code in 
the operatio n field. This is DTFSR, 
DTFDA, DTFIS, or DTFPH, depending on 
the type of processing to be performed 
for the file. 

• Keyword entries in the operand field, 
if desired. 

• A continuation punch in column 72, if 
detail cards are necessary. 

The detail cards follow the header card, 
and they may be arranged in any order. 



Each detail card is blank in the name and 
operation fields and is punched with one or 
more operands. These operands must be the 
keyword type of macro parameter. That is, 
they are expressed as equal conditions, for 
example, DEVICE=DISK 1 1 . All detail cards 
except the final one used must be punched 
with a comma immediately following the last 
operand and with a continuation punch in 
column 72. They may contain comments if a 
space is left after the comma following the 
last operand. The final card may contain 
comments if a space is left after the last 
operand. When a particular detail entry 
does not apply to a file, that operand must 
be omitted. 

The begin- def init i o n card preceding the 
first set of DTF cards (when a 
disk-resident system will be used for 
program execution) must be punched with 
DTFBG in the operation field and DISK in 
the operand field. The name field is 
blank. 

The end^of-de f inition . card following the 
last set of DTF cards must be punched with 
DTFEN in the operation field. The name 
field is blank. The operand field may be 
blank, or it may be punched with one 
operand if the object program is not to be 
executed in a disk system. In this case 
the operand OVLAY may be specified to 
reduce the amount of main storage used for 
the program. When the object program is 
executed (in a system that does not utilize 
a disk-resident supervisor) , OVLAY causes 
the OPEN routine to be overlaid by the 
user's problem program, and the CLOSE 
routine to overlay the user's program. All 
files should be opened by one OPEN macro 
instruction, and all files should be closed 
by one CLOSE macro instruction. In this 
case, CLOSE should be the last instruction 
before EOJ in the user's program. 

The reference card, with DTFRF in the 
operation field, must precede the first 
DTFSN card for STR processing or the first 
DTFBS card for BSC processing. Where other 
DTF macros are present, DTFRF must follow 
the DTFEN card. 

The detail parameter entries for each of 
the four declarative macros are described 
in the following pages. They are grouped 
by type of processing. 



CONSECUTIVE PROCESSING (DTFSR) 

The following lists show the DTFSR detail 
entries that apply to each type of file 
when records are processed consecutively. 
These entries are explained in the 
following text and shown in Figure 35. 
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ALTTAPE=SYSnnn 

1442 
2520 

2540 This entry specifies the symbolic unit 

P unc h (SYSnnn) for a tape drive that will be used 

as an alternate when a tape file has two or 
BIKSIZE more reels (volumes) of data. 
CONTROL 
CRDERR 

CTLCHR The actual drive is assigned to this 

DEVADDR symbolic unit either at job-execution 

DEVICE (load) time by the Job Control ASSGN card, 

IOAREA1 or at system-generation time by the SYMUN 

IOAREA2 macro instruction. 

IOREG 

RECFORM 

RECSIZE The symbolic unit for the first drive 

TYPEFLE used for this file is specified in the 
WORKA DTFSR entry DE VA DDR = SYSnnn . If DEVADDR is 

assigned to the same unit used for writing 
out checkpoint records, the user should be 
aware that checkpoint records may not be 
written on the alternate tape drive. (See 
the section CHKPT Macro . ) 



Whenever an alternate drive is specified 
and an end-of- volume condition (EOV, EV, or 
FEOV) occurs for a multi-reel file, the 
IOCS OPEN/CLOSE routines update the number 
of the drive actively in use. Thus, after 
an EOV (or FEOV) on reel 1, 3, 5, etc., 
2671 IOCS expects the next reel to be mounted on 

Paper the device assigned to ALTTAPE. After an 

Tape EOV (or FEOV) on reel 2, 4, 6, etc., IOCS 

Reade r expects the next reel to be mounted on the 
device assigned to DEVADDR. 

BLKSIZE 

DEVADDR 

DEVICE 

EOFADDR 

IOAREA1 

IOAREA2 

IOREG 

RECFORM 

RECSIZE 

TRANS 

TYPEFLE 

WORKA 
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APPLIES TO 






NAME 


OPERATION 


OPERAND* 


2311 

DISK DRIVE 


2400 MAGNETIC 
TAPE UNIT 


1442/2501/2520/ 
2540 READER 


1442/2520/2540 
PUNCH 


1403/1404/1443/ 
.1445 PRINTER 


1052 PRINTER- 
KEYBOARD 


2671 PAPER 
TAPE READER 


1285 OPTICAL 
READER 


1287 OPTICAL 
READER 


MUST BE INCLUDED 


REMARKS* 


Filename 


DTFSR + 




X 


X 


X 


X 


X 


X 


X 


X 


X 


Each File 


Header Card. 

Specify Symbolic File Name. 






ALTTAPE=SYSnnn 




X 
















Multi-Volume File Using Two Tape 
Drives 


Symbolic Unit for Alternate Tape 
Drive . 






BLKSIZE=ti 


X 


X 


X 


X 


X 


X 


X 


X 


X 


Each File Except Combined File 
with Separate I/O Areas 


Length of I/O Area. 

n = Maximum Number of Characters. 






CHECKPT=n 




X 
















CHKPT Macro Used 








CKPTREC=YES 




X 
















Bypass Checkpoint Records on Input 


Applies to Input File Only. 






CONTROL=YES 


X 


X 


X 


X 


X 






X 


X 


CNTRL Macro Used 


Does Not Apply to 2501 . 
CTLCHR Must Be Omitted. 






COREXIT=Name 
















X 


X 


For Correction Routines 


Symbolic Name of Correction Routine 






CRDERR=RETRY 








x 












Punch Again on Error Condition 


Applies to 2520 and 2540. 






CTLCHR=YES 








x 


X 










Logical Records Have Control 
Character in First Position 


Each Record Must Contain a Control 
Character. 

CONTROL Must Be Omitted and the 
CNTRL Macro Must Not Be Used for 
This File 






+DEVADDR=SYSnnn 




X 


X 


X 


X 


X 


X 


X 


X 


Each File Except Disk 


Symbolic Unit for the I/O Device Used 
Tor me r i ic . 






DEVICE=DISK1 1 
TAPE 
READ01 


X 


X 


X 














Disk Input/Output File 
2501 Input File 


Include for Each File and Specify 
Proper Name after DEV1CE = « 












x 


X 












2520 Input/Output File 








READ40 
READ42 






x 

"X ~ 


x 












2540 Input/Output File 
1442 Input/Output Ffle 








PRINTER 










X 










1403, 1404, 1443, 1445 Output 








CONSOLE 












X 








1052 Input/Output 








PTAPERD 














X 






2671 Input File 








READ85 
















X 




1285 Input File 








READ87T 


















X 


1287 Tape Input 








READ87D 


















X 


1287 Document Input 








EO FADDR=Name 


X 


X 


X 








X 


X 


X 


npu i e 


symbolic iName ot tna— ot— rile Koutine 






ERROPT=IGNORE 


X 


X 
















Process Error Records 


Applies Only to Disk or Tape Input. 






SKIP 




















Skip over Error Records 


Prevents Job Termination on Error 






Name 




















User Routine for Error Records 


Condition. Enter Desired Specifica- 
tion after ERROPT=. 






FILABL=STD 




X 
















Check or Write Standard Labels 


Include for Tape Input/Output and 






NSTD 




















File Contains Nonstandard Labels 


Specify Desired Operation after 






NO 




















Unlabelled File 


FILABL=. 






HEADER=YES 
















X 


X 


Header record will be 
read by Open 


If this entry is omitted, OPEN 
assumes no header record 






INAREA=Name 






X 














Separate Areas for Input and Output 
for a Combined File 


Applies Only to 1442. 






INBLKSZ=h 






X 














Separate Areas for Input and Output 
for a Combined File 


Applies Only to 1442. 
Length of 1NAREA. 






IOAREA1 =Name 


X 


X 


X 


X 


X 


X 


X 


X 


X 


Each File Except Combined File 
with Separate I/O Areas 


Symbolic Names of Input/Output 
Area. Same as Used in DS. 






IOAREA2=Name 


X 


X 


X 


X 


X 




X 


X 


X 


Two I/O Areas Used. Not Valid 
if DEVICE = READ87D 


Symbolic Name of Second Input/Out- 
put Area . Same as Used in DS . 






IOREG=ti 


X 


X 


X 


X 


X 


X 


X 


X 


X 


Process Blocked Records in I/O 
Areas; Process, in the Input Area, 
Variable-Length Records Read ■ 
Backwards; Process in Two I/O 
Areas; or Process Undefined Records 
On 1285 


n = Number of General Purpose 
Register 2-1 1 . Omit WORKA=YES. 






LABADDR=Name 


X 


X 
















Check/Build Additional User- 
Standard Labels, or Process 
Nonstandard Labels 


Symbolic Name of User's Label 
Routine. 
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APPLIES TO 






NAME 


OPERATION 


OPERAND' 


2311 

DISK DRIVE 


2400 MAGNETIC 
TAPE UNIT 


1442/2501/2520/ 
2540 READER 


1442/2520/2540 
PUNCH 


1403/1404/1443/ 
1445 PRINTER 


1052 PRINTER- 
KEYBOARD 


2671 PAPER 
TAPE READER 


1285 OPTICAL 
READER 


1287 OPTICAL 
READER 


MUST BE INCLUDED 


REMARKS* 


Filenamet 


DTFSRT 


OFFLINE=YES 
















X 


X 


Allow program controlled correction 


If this entry is omitted, reject char- 
acters are retried 9 times and keyboard 
correction allowed on tenth retry. 






OUAREA=NAME 






X 














Separate Areas for Input and Out- 
put for a Combined File 


Applies only to 1442 . 






OUBLKSZ=n 






X 














Separate Areas for Input and Out- 
put for a Combined File 


Applies Only to 1442. 
Length of OUAREA. 






PRINTOV=YES 










X 










PRTOV Macro Used 








READ=f ORWARD 




X 


















If This Entry Omitted, IOCS Assumes 
FORWARD . 






BACK 














• 






Read Tape Backwards 


Does not Apply to Variable-Length 
Blocked Records. 






RECFORM=FIXUNB 

FIXBLK 
VARUNB 

VARBLK 

UNDEF 


X 

X 
X 

X 

X 


X 

X 
X 

X 

X 


X 


X 

X 
X 


X 

"X 

X 


X 
X 


X 
X 


X 
X 


X 
X 


Fixed-Length Blocked Records 
Variab~Te-Length Unblocked Records 

Variable-Length Blocked Records 

Undefined Records 


Specify as Needed for Fixed-Length 

Unblocked Records. 

If This Entry Omitted, IOCS Assumes 

FIXUNB. 

Disk or Tape Records Require Record- 
Length Field. 

Blocks Require Block-Length Field. 
Records Require Record-Length Field. 






RECSIZE=ti 


X 


X 




X 


X 


X 


X 


X 


X 


Fixed-Length Blocked Records 
Undefined Records 


n = Number of Characters in Record, 
n = Number of a Register 2-1 1 . 






REWIND=UNLOAD 




X 
















Unload on CLOSE or End-of-Volume 


Omit to Rewind Only, at OPEN, 






NORWD 




















Prevent Rewinding 


CLOSE, or End-of-Volume. 






TPMARK=NO 




X 
















Prevent a Tape Mark from Being 
Written Ahead of Data Records 


Applies to Unlabeled Tape Files and 
Files with Non-Standard Labels. 






TRANS-Name 














X 






Tape Punched with Code Other 
than EBCDIC and IOCS is to 
Perform Translation 


Symbolic Name of Code-Translation 
Table. 






TRUNCS=YES 


x 


















Fixed-Length Blocked Records with 
Short Blocks 


Include for Output if TRUNC Macro 
Used. 

Include for Input if TRUNC Macro 
Was Used When File Was Created. 






^TYPEFLE=INPUT 


X 




X 






x 


x 


x 


x 


Each file 


Specify Proper Type after TYPEFLE=. 






OUTPUT 


X 


X 




X 


1 X 


X 










CMBND Applies to 1442, or 2520 or 






CMBND 






X 
















to 2540 if Punch-Feed-Read Special 
Feature is installed. 






UCS=NO 










x 












Applies only to 1403. 






YES 










X 










Ignore Command Rejects on 1403 
Printer without UCS Feature 


CONTROL=YES Required. 






UPDATE=YES 


X 


















PUT Used For a Disk Input File 








VARBLD=h 


X 


X 
















Variable-Length Blocked Records 
Built in Output Area 


n = Number of a Register 2-1 1 . 






VERIFY=YES 


X 


















Check Record Written on Disk 








WLRERR=Narne 


X 


X 
















User Routine for Wrong-Length 
Records 


Symbolic Name of Wrong-Length- 
Record Routine. If Omitted, Error 
Handled As in ERROPT, or Job 
Terminated. 






WORKA^ES 


X 


X 


X 


X 


X 


X 


X 


X 


X 


GET or PUT Specifies a Work Area. 
Not Valid if DEVICE=READ87D. 


Omit IOREG=n. 



t Must be included. Other entries are included when applicable . 



' When two or more choices are shown, select only the appropriate one and enter it after the=sign. 

* The header and each detail card except the last one used in a file set must contain a continuation punch in column 72. Each detail card except the last one used must also 
contain a comma after the last operand. 

In all entries: Solid caps must be entered as shown (For Example, CONTROL=YES). 

Lower-case letters are to be replaced by programmer's symbolic name or a number (For example. Filename in header card, or BLKSIZE=n where n is replaced), 
n is a decimal self-defining value. 



Figure 35. DTFSR Entries (Part 2 of 2) 
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BLKSIZE=n 

This entry indicates the size of the input, 
or output, area specified by I0AREA1 . 
BLKSIZE specifies the maximum number (n) of 
characters that will be transferred to, or 
from, the area at any one time. When 
variable-length records are read, or 
written, the area must be large enough to 
accommodate the largest block of records, 
or the longest single record if the records 
are unblocked. 

If card-punch or printer-output records 
include control characters (DTFSR CTLCHR 
specified) and/or record-length fields for 
variable-length records (RECFORM=VARUNB) , 
the BLKSIZE specification must include the 
extra bytes allotted in the main-storage 
output area. 

If two input, or output, areas are used 
for a file (I0AREA1 and I0AREA2) , the size 
of only one area is specified in this 
entry. 

IOCS uses this specification to: 

• Construct the count field of the CCW 
for an input file. 

• Construct the count field of the CCW 
for an output file of fixed-length 
records. 

• Check physical record length for a file 
of fixed-length blocked input records. 

• Determine if the space remaining in the 
output area is large enough to 
accommodate the next variable-length 
output record. 

CHECKPT=n 

This entry is reguired for a tape input 
file whenever the CHKPT (checkpoint) macro 
instruction is included in the problem 
program. It is reguired for a tape outpu t 
file of data records when the CHKPT 
instruction is used, unless the checkpoint 
records are also to be written on this 
file. Whenever an output file is to 
contain checkpoint records interspersed 
with data records, this entry must be 
omitted. 

When the macro- library checkpoint 
routines are assembled, a table of restart 
information is included (see CHKPT Macro ) . 
This table contains a 4-byte field (full 
word) for each tape drive used by the 
problem program and specified by the first 
parameter of the CHKPT instruction. Each 
of these 4-byte fields contains information 
for properly positioning the data file when 
the job is restarted after an interruption. 
Part of the repositioning information is 



the block count for the file, which is 
contained in two of the four bytes. The 
block count indicates the number of 
physical tape records that have been read 
(or written) , and thus it must be 
incremented whenever an I/O operation 
occurs during program execution. IOCS can 
update the block count for a particular 
file if the 4-byte field related to the 
file is identified. Therefore the user 
specifies in the CHECKPT entry the number 
(n) of the 4-byte field that IOCS is to use 
for this file. For example, if three 
input/output tape files are used in a job, 
he could plan that the three 4-byte fields 
would be identified by the numbers 1, 2, 
and 3. Then in the file definition for 
each file, he specifies (by CHECKPT=n) one 
of the three numbers (1, 2, or 3). 

This entry is omitted for an output file 
containing both data and checkpoint records 
because, on restart, the tape is positioned 
by the Restart program at the first data 
record following the checkpoint records 
that are used for restarting. 



CKPTREC=YES 

This entry is reguired if a tape - input file 
will contain checkpoint records 
interspersed among the data records. With 
this entry, IOCS recognizes the checkpoint 
records and bypasses them. 



CONTROL=YES 

This entry must be included if a CNTRL 
macro instruction will be issued for this 
file. A control command issues orders to 
the I/O device to perform non-data 
operations such as card or document stacker 
selection, carriage skipping, line marking, 
tape rewinding, etc. 

From this specification IOCS generates a 
CCW for control commands and also 
recognizes a CNTRL macro. If the CNTRL 
macro is not used in the program, then 
DTFSR entry CONTROL=YES must be omitted. 

When CONTROL is included, the DTFSR 
entry CTLCHR must not be included. 



COREXIT=Name 

COREXIT provides an exit to the user's 
error correction routine for the 1285 or 
1287 Optical Reader. After a GET, WAITF, 
or CNTRL macro (to increment or eject 
and/or stacker select a document) is 
executed and an error occurs, the error 
correction routine is entered, and an 
indication of the reason for the entry is 
provided in Filename+17. 
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Filename+17 contains the following 
hexadecimal bits indicating the conditions 
that occurred during the last line or field 
read. Filename+17 should also be tested 
for appropriate error indication (s) after 
issuing the optical reader macros DSPLY, 
RESCN, RDLNE, CNTRL READKB., and CNTRL MARK. 
More than one error condition may be 
present. 

X'OV A data check has occurred. (Five 
read attempts for journal tape 
processing or three read attempts 
for document processing were made.) 

X'02' The operator corrected one or more 
characters from the keyboard. 
(Journal tape processing only) . 

X'04' A wrong length record condition has 
occurred. (Ten read attempts were 
made.) Not applicable for 
undefined records. 

X'08' An eguipment check resulted in an 
incomplete read. (Ten read 
attempts were made.) 

X'10' A non-recovery error occurred. 

X'20' A stacker-select command was given 
after the allotted time had elapsed 
and the document had been put in 
the reject pocket (Document 
processing only) . 

X*40' The document scanner was unable to 
locate the reference mark. (Ten 
attempts were made.) 



Filename+17 can be interrog 
user to determine the reason f 
the error-correction routine, 
done by setting up an address 
filename. This also permits t 
reference the DTF area at any 
program. Choice of action in 
error-correction routine will 
by the particular application 



ated by the 
or entry to 

This may be 
constant for 
he user to 
place in his 
the user's 
be determined 
involved. 



If the user issues the CNTRL, DSPLY, 
RDLNE, or RESCN macros in his error routine 
within COREXIT, he must first save and 
later restore registers 14 and 15. All 
exits from COREXIT (except as noted) must 
be to the address in register 14. This 
address returns the user to the point in 
the program from which the branch to 
COREXIT occurred. If the command chain bit 
is on in the READ CCW for which the error 
occurred, IOCS completes the chain upon 
this return from the COREXIT routine. 



register 14 from the COREXIT routine. 
Following a nonrecovery error, the Optical 
Reader file must be closed, the condition 
causing the nonrecovery must be cleared, 
and the file must be reopened before 
processing can continue. 

When processing documents, a nonrecovery 
error (indicating that a jam occurred 
during a document incrementation operation 
or a scanner control failure has occurred, 
etc. ) , reguires that the document be 
removed, either manually or by nonprocess 
runout. The user program should branch to 
read the next document. Also, if the 1287 
scanner is unable to locate the document 
reference mark, the document cannot be 
processed. The document must be ejected 
and stacker selected before attempting to 
read the following document or looping will 
occur. In any of these cases, the user 
mu st not branch to the address in register 
14 from the COREXIT routine. The user . 
should ignore any output resulting from the 
document in any case. 

Eight binary counters are used to 
accumulate totals of certain 1285 and 1287 
error conditions. These counters each 
occupy four bytes, starting at Filename+20. 
Filename is the same, specified in the DTF 
header entry. The error counters are: 



Counter 



Address 
Filename+20 

Filename+24 
Filename+28 
Filename+32 



Filename+36 
Filename+40 



Contents 

Incomplete read 
(eguipment check) 

Incomplete read 
uncorrectable after 
ten read attempts. 

Wrong length records 
(not applicable for 
undefined records) . 

Wrong length records 
uncorrectable after 
ten read attempts 
(not applicable for 
undefined records) . 

Keyboard corrections 
(journal tape only) . 

Journal tape lines, 
including retried 
lines, or document 
fields including 
retried fields, in 
which data checks are 
present. 



When processing journal tapes, a 
nonrecovery error (torn tape, tape jam, 
etc.) normally reguires complete 
reprocessing of the tape. In this case, 
the user must not branch tc the address in 



7 Filename+44 Lines marked (journal 

tape only) . 

8 Filename+48 Count of total lines 

read from journal 
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tape or the number of 
CCW chains executed 
during document 
processing. 

The user may print out the contents of 
these counters for analysis, at 
end- of -file, or at end-of-job, or he may 
ignore the counters. (Binary contents of 
the counters should be converted to a 
printable format.) 

Note ; The user cannot issue a GET, READ, 
or WAITF macro in his error correction 
routine. In this routine, records must not 
be processed. The record that caused the 
exit to the error routine will be available 
for processing upon return to the user's 
mainline program. Any processing included 
in the error routine would be duplicated 
after return to the mainline program. 



CRDEER=RETRY 

This entry applies only to a card output 
file in the IBM 2520 or 2540. It specifies 
the operation to be performed if an error 
is detected. 

Normally if a punching error occurs, it 
is ignored and operation continues. The 
error card is stacked in pocket 1 (2520) or 
pocket P1 (2540). Correct cards are 
stacked in pocket 2 (2520) or pocket P2 
(2540) . If this CRDERR entry is included 
to specify retrying, however, IOCS also 
notifies the operator and then enters the 
wait state when an error condition occurs. 
The operator can either terminate the job 
or instruct IOCS to repunch the card. 

From this specification, IOCS generates 
a retry routine for the 2520 or 2540. IOCS 
also generates a sav e area for the card 
punch record read from the 2540. 



CTLCHR=YES 

The CTLCHR (control character) entry 
applies only to printer and punch output 
files. It is included if each logical 
record to be written or punched contains a 
control character (carriage control or 
stacker selection) in the record itself, in 
the main-storage output area. For 
fixed-length or undefined records, the 
control character must be the first 
character. For variable-length records, it 
is the first character after the 
record-length field. The control character 
codes are the same as the command codes 
(including the modifier bytes) used for a 
punch command or a print command (delayed 
only) . 



With this entry, the IOCS routines cause 
the control-character-specified printer or 
card punch order to be issued to the I/O 
device. Printing or punching begins with 
the second character in the record. 

When this CTLCHR entry is not included, 
any control functions desired must be 
performed by the CNTRL macro. 



DEVADDR=SYSnnn 

This entry specifies the symbolic unit 
(SYSnnn) to be associated with this logical 
file. The symbolic unit represents - an 
actual I/O device address;. The symbolic 
unit may be: 

SYSRDR for system control-card reader 

SYSLST for system printer 

SYSIPT for main system input device 

SYSOPT for main system output device 

SYSLOG for control-card logging device 

SYS000-SYS254 for other devices in the 
system . 

This is generally a unigue number for each 
logical file (except files on disk) . 

The symbolic unit (SYSnnn) is used in 
the Job Control ASSGN card (or in the 
Supervisor-Assembly macro SYHUN) to assign 
the actual I/O device address to this file. 
If the ASSGN card is used to assign the 
device for program execution, the file of 
logical records can be read from or written 
on different units at different times. For 
example, a reel of tape may be mounted on 
any tape drive that is available at the 
time the job is ready to be run, by merely 
assig n ing that drive to the symbolic unit. 

Whenever two devices are used for one 
logical file, such as an alternate tape 
drive (specified in DTFSR ALTTAPE) , this 
DEVADDR entry specifies the symbolic unit 
for the first device. 

The symbolic unit is specified for all 
units except the 2311 disk drive. For 
files on this unit, DEVADDR is omitted. 
The symbolic unit for a disk drive is 
supplied by a Job Control XTENT card. 



DEVICE= 

This entry must be included to state the 
I/O device associated with this logical 
file. One of the following specifications 
must be entered immediately after the = 
sign. 
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DISK11 - for an input or output file on 
disk (231 1) . 

TAPE - for an input or output file 

recorded on magnetic tape 
(2401, 2402, 2403, 2404). 

PRINTER - for reports printed on a 1403, 
1404, 1443, or 1445. 

READ01 - for an input card file in a 
2501. 

READ20 - for an input or output card 
file in a 2520. 

READ40 - for an input or output card 
file in a 2540. 

READ42 - for an input or output card 
file in a 1442. 

CONSOLE - for input from and output to 
the printer-keyboard (1052). 

PTAPERD - for an input file recorded on 
paper tape (2671) . 

READ85 - for input from a 1285 Optical 
Reader. 

READ87T - for journal tape processing 
for a 1287 Optical Reader. 

RE AD 87 D - for document processing for a 
1287 Optical Reader. 

From this specification, IOCS sets up 
the proper CCWs and device-dependent 
routines for this file. For document 
processing on the 1287 Optical Reader, the 
coding of CCWs is accomplished by the user. 
This allows command chaining, comparing, 
and branching without experiencing an 
interrupt for each function. 



EOFADDR= Name 

This entry must be included for: 

Card reader files 
Paper tape reader files 
Magnetic tape input files 
Consecutive disk input files 
Optical roll reader files. 

It specifies the symbolic name of the 
user's end-of-file routine. IOCS will 
automatically branch to this routine on an 
end-of-file condition. In his routine, the 
programmer can perform any operations 
reguired for the end of the job, and he 
generally issues the CLOSE instruction for 
the file . 

IOCS detects end-of-file conditions as 
follows: 



• Card reader - by recognizing /* punched 
in card columns 1 and. 2. If cards are 
allowed to run out, without a /* 
trailer card, an error condition is 
signalled to the operator (intervention 
reguired) . 

• Paper tape reader - by recognizing the 
end of tape when the end-of-file switch 
is set at ON. 

• Magnetic tape input - by reading a tape 
mark and EOF in the trailer label when 
standard labels are specified. If 
standard labels are not specified, IOCS 
assumes an end-of-file condition when 
the tapemark is read. The user must 
determine, in his routine, that this 
actually is the end of the file. 

• Consecutive disk input - by reading an 
end-of-file record or reaching the end 
of the last extent supplied by user. 

• Optical Reader input — when reading data 
from documents on a 1287, end-of-file 
condition is recognized by depression 
of the end-of-file key on the console 
when the input hopper is empty4 When 
processing journal tapes on a 1285 or 
1287, end-of-file is detected by 
depression of the end-of-file key after 
the end of the tape has been sensed. 

When IOCS detects the end of file, it 
branches to the user's routine specified by 
EOFADDR. If journal tapes are being 
processed it is the user's responsibility 
to determine if the current roll is the 
last roll to be processed. For 1285, it is 
suggested that this be accomplished by 
keying in header information at the 
beginning of each roll. This information 
could then be interrogated in this routine 
to determine whether it is the last roll. 
Regardless of the situation, the tape file 
must be closed for each roll within this 
routine. If the current roll is not the 
last, OPEN must be issued. The OPEN macro 
instruction allows header (identifying) 
information to be entered at the reader 
keyboard and read by the processor when 
using logical IOCS. The same procedure, as 
well as the method described under the OPEN 
macro, can be used for 1287 processing of 
multiple journal tape rolls. 



ERROPT= 

This entry applies to disk or tape input 
files, and it specifies functions to be 
performed for an error block. 

If a parity error is detected when a 
block of consecutive disk records is read, 
the disk block is reread 10 times before it 
is considered an error block. If a parity 
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error is detected when a block of tape 
records is read, the tape is backspaced and 
reread 100 times before the tape block is 
considered an error block. If either 
FILABL=STD or CHECKPT, or both, is 
specified, the error block is included in 
the block count that is taken. After this 
the job is automatically terminated, unless 
this ERROPT entry is included to specify 
other procedures to be followed on an error 
condition. Either IGNORE, SKIP, or the 
symbolic name of an error routine can be 
specified in this card. One of these 
specifications is entered immediately after 
the = siqn in this keyword operand. The 
functions of these 3 specifications are: 

IGNORE The error condition is 

completely ignored, and the 
records are made available to 
the user for processing. 

SKIP No records in the error block 

are made available for 
processing. The next block is 
read from disk or tape, and 
processing continues with the 
first record of that block. 
The error block is included in 
the block count, however. 

Name IOCS branches to the user's 

routine, where he may perform 
whatever functions he desires 
to process or make note of the 
error condition. Register 1 
contains the address of the 
block in error, and Register 
14 contains the return 
address. 

In his routine, the 
programmer should address the 
error block, or records in the 
error block, by referring to 
the address supplied in 
Register 1. The contents of 
the IOREG register or the work 
area (if either is specified) 
may vary and therefore should 
not be used for error blocks. 
Also, the programmer must not 
issue any GET instructions for 
records in the error block. 
If he uses any other IOCS 
macros in his routine, he must 
save the contents of Registers 

114 and 15 and restore them 
prior to returning to IOCS. 
At the end of his routine, he 
must return to IOCS by 
branching to the address in 
Register 14. When control is 
returned to the problem 
program, the first record of 
the next block is available 
for processing in the main 
program. 



This ERROPT entry does not apply to disk or 
tape output files. The job is 
automatically terminated if a parity error 
still exists after IOCS attempts 10 times 
to write a disk output block, or 15 times 
to write a tape output block. For tape, 
this includes erasing forward 14 times. 

This entry applies to wrong-length 
records if the DTFSR entry WLRERR is not 
included. 



FILABL= 

This entry applies to a tape input or 
output file. One of the following 
specifications is entered immediately after 
the = sign : 

STD for a tape input file if 

standard labels are to be 
checked by IOCS, or for a tape 
output file if standard labels 
are to be written by IOCS. 

NSTD for a tape input or output 

file that has nonstandard 
labels. These labels may be 
processed by the user (see 
Initialization: Non standard 
Tape Labels ) . NSTD is 
specified for sta ndard input 
labels if they are not to be 
checked by IOCS. 

NO for a tape file that does not 

contain labels. The entry 
FILABL=NO may be omitted, if 
desired, and IOCS will assume 
that there are no labels. 

HEADER=YES 

This entry is reguired if header 
(identifying) information is to be keyed in 
by the operator on the 1285 or 1287 Optical 
Reader keyboard. The OPEN routine reads 
the information only when this entry is 
present. If the entry is not included, 
OPEN assumes no header information is to be 
read . 

INAREA=Name 

This entry applies only to a card file in 
an IBM 1442 that is to be updated 
(TYPEFLE=CMBND) and for which separate 
input and output areas are required. 
INAREA specifies the symbolic name of the 
input area to which the card record is to 
be transferred. OUAREA is used in 
conjunction with INAREA, and both IOAREA1 
and IOAREA2 must be omitted. 

If the same I/O area is to be used for 
both input and output in a combined file, 
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INAREA and OUAREA are omitted, and I0AREA1 
specifies the name of the I/O area. 

This entry does not apply to combined 
files in an IBM 2520 or 2540. 

INBLKSZ=n 

This entry is used in conjunction with 
INAREA for a combined file in the 1442 when 
separate input and output areas are 
required. It specifies the maximum number 
(n) of characters that will be transferred 
to the input area (INAREA) at any one time. 
Whenever this entry is included, the 
corresponding entry OUBLKSZ must also be 
included, and BLKSIZE must be omitted. 

IOAREA 1=Name 

This entry is included to specify the 
symbolic name of the input, or output, area 
used by this file. The input/output 
routines will transfer records to or from 
this area. The specified name must be the 
same as the name used in the DS instruction 
that the programmer must set up to reserve 
this area of main storage . If RECFORM 
specifies VARUNB or VARBLK, the I/O area 
must begin on a half word boundary.. 

From this specification, IOCS constructs 
the data address field of the CCW for this 
file. 

For a disk - output file, the user must 
reserve eight bytes at the beginning of his 
I/O area, ahead of the positions allotted 
for data records. These eight bytes are 
necessary to allow IOCS to construct the 
count area for the disk record. 

This entry must not be included for a 
1442 card file if INAREA and OUAREA are 
specified for the file. 

The IBM 1052 Printer-Keyboard and the 
1287 Optical Reader in document mode can 
have only one I/O area, which must be 
IOAREA 1. 

IOAREA2=Name 

Two input, or output, areas can be planned 
for a file, to permit an overlap of data 
transfer and processing operations. When 
this is done, this IOAREA2 entry must be 
included. It specifies the symbolic name 
of the second I/O area. The name must be 
the same as the name used in the DS 
instruction that the programmer must set up 
for this area. The second I/O area must be 
the same length as the first I/O area. If 
RECFORM specifies VARUNB or VARBLK, the I/O 
area must begin on a halfword boundary. 

This entry must not be included for a 
1442 card file if INAREA and OUAREA are 



specified for the file. Also this entry 
does not apply to the IBM 1052, which 
cannot utilize a second area, and likewise 
it must not be used to process documents on 
the 1287 optical reader. 

IOCS uses this specification to 
construct the data address field of a CCW 
and to determine that overlap of I/O and 
processing is possible. 

For a disk output file, the user must 
reserve eight bytes at the beginning of bis 
I/O area, ahead of the positions allotted 
for data records. These eight bytes are 
necessary to allow IOCS to construct the 
count area for the disk record. 

IOREG=n 

This entry specifies the general-purpose 
register (n) that the input/output routines 
can use to indicate which individual record 
is available for processing. IOCS puts the 
absolute base address of the current record 
in this register each time a GET or PUT is 
issued. Any register number 2-11 may be 
specified. The other registers (0-1 and 
12-15) cannot be used (see Base, Register 
Instructions for register usage). 

The same register may be specified in 
the IOREG entry for two or more files in 
the same program, if desired. In this case 
the problem program must store the address 
supplied by IOCS for each record, so that 
the address is available for processing the 
contents of the record. 

This entry must be included whenever: 

• Blocked input or output records (from 
disk or tape) are processed directly in 
the I/O area. 

• Variable-length unblocked tape records 
are read backwards and processed 
directly in the input area. 

• Two input, or output, areas are used 
and the records (either blocked or 
unblocked) are processed in the I/O 
areas. 

• Undefined journal tape records are 
processed by the 1285 and 1287 Optical 
Readers. The "read" by these devices 
is accomplished by a backward scan 
which places the rightmost character in 
the record in the rightmost position in 
the I/O area and subsequent characters 
in sequence from right to left. The 
register defined by IOREG is used to 
indicate to the user, the leftmost 
position of the record. 

Whenever this entry is included for a 
file, the DTFSR entry WORKA must be 
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omitted, and the GET, or PUT, instructions 
must not specify work areas. 



LABADDR=Name 

The user may require one or more disk or 
tape labels in addition to the standard 
file header label or trailer label (on 
tape) . If so, he must include his cwn 
routine to check, or build, his 
user-standard label (s) . The symbolic name 
of his routine is specified in this entry. 
IOCS branches to this routine after it has 
processed the standard label. This entry 
is also required whenever nonstandard 
labels are to be checked or written by the 
user (DTFSR FILABL specifies NSTD) . 

LABADDE allows one user's label routine 
to be specified for all types of labels for 
the file: header labels, end-of-file 
labels, and end-of -volume labels. On an 
input file, the user can determine the type 
of label that has been read by the 
identification in the label itself. For an 
output tape file, however, IOCS indicates 
to the user the type of label that is to be 
written. For this, IOCS supplies a code in 
the low-order byte of Register 0, as 
follows: 

0 - Header label (letter 0) 
F - End-of-file label 
V - End^pf- volume label 

In his routine the user can test this byte 
and then build the appropriate type of 
label. 

Logical IOCS uses general registers 14 
and 15 for linkage to and from a called 
routine; therefore, these registers must 
not be destroyed. If they are required by 
the user's label routine, they must first 
be saved and then restored prior to 
returning to the mainline of the program. 
At the end of his routine, the programmer 
must return to IOCS by use of the LBRET 
macro. 

OFFLINE=YES 

This entry must be included whenever the 
1285 and 1287 (journal tape mode) Optical 
Readers are operated in the offline mode. 
It generates coding for the RDLNE macro. 

If this entry is omitted, an additional 
read is performed when five attempts to 
read a line containing a data check (s) are 
unsuccessful. It forces on-line correction 
Of any unreadable character (s) by 
individually projecting the unreadable 
character (s) on the display scope. The 
operator must key in a correction (or 
reject) character (s) . The RDLNE macro 



cannot be used if this parameter is 
omitted. 



OUAREA=Name 

This entry is used in conjunction with 
INAREA for a combined file in an IBM 1442 
that requires separate input and output 
areas. It specifies the symbolic name of 
the output area from which the updated card 
record is punched. 

0UBLKSZ=n 

This entry is used in conjunction with 
0U AREA for a combined file. Similar to 
INBLKSZ, it specifies the maximum number 
(n) of characters that will be transferred 
from the output area (OUAREA) at any one 
time . 

PRINTOV^YES 

This entry must be included whenever the 
PRTOV macro instruction is included in the 
problem program. 

READ = 

This entry may be included for a magnetic 
tape, input file to specify the direction in 
which the tape is to be read. One 
specification or the other is entered 
immediately after the = sign: 

FORWARD for a tape read in the normal 
forward direction. 

BACK for a tape read backwards. A 

tape file may be read 
backwards if it contains 
unblocked records, 
fixed-length blocked records, 
or undefined records. 
READ=BACK cannot be specified 
for a file that contains 
variable-length blocked 
records. 

If this entry is omitted, IOCS assumes 
forward reading. 



RECF0RM= 

This entry specifies the type of records 
(fixed or variable length, blocked or 
unblocked, or undefined) in the input or 
output file.- If the entry REC FORM is 
omitted, fixed-length unblocked records are 
assumed. One of the following 
specifications may be entered immediately 
after the = sign: 

FIXUNB for fixed-length unblocked 
records. 
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FIXBLK for fixed-length blocked 

records. This applies only to 
disk and magnetic tape input 
or output. 

VARUNB for variable-length unblocked 
records. This applies only to 
disk input or output (23 1 1) , 
magnetic tape input or output 
(2400), card punch output 
(1442, 2520, or 2540), and 
printer output (1403, 1404, 
1443, or 1445). 

VARBLK for variable-length blocked 

records. This applies only to 
disk and magnetic tape input 
or output. 

UNDEF for undefined records. This 

applies to any file except 
card input (1442, 2501, 2520, 
or 2540) . 

Thus the records in a file can be specified 
as follows: 

Disk and magnetic tape input or 

output: FIXUNB, FIXBLK, VARUNB, 
VARBLK, or UNDEF 

Card input: FIXUNB 

Card output: FIXUNB, VARUNB, or UNDEF 

Printer output: FIXUNB, VARUNB, or UNDEF 

Printer-keyboard input or 

output: FIXUNB or UNDEF 

Paper tape input: FIXUNB or UNDEF 

Optical reader input: FIXUNB or UNDEF 



RECSIZE=n 

This entry must be included for journal 
tape, or magnetic tape records that are 
fixed-length blocked (RECFORM= FIXBLK) or 
undefined (RECFORM=UNDEF) , in an input or 
output file. For other files of records, 
this entry must be included whenever 
records are undefined (RECFORM=UNDEF) . 

For fixed-length blocked disk or tape 
records, this entry specifies the number 
(n) of characters in an individual record. 
The input/output routines use this factor 
for blocking or deblocking records, and for 
checking record length of input records. 

For undefined records, this entry 
specifies the number (n) of the 
general- purpose register that will contain 
the length of each individual input or 
output record. This. may be any register 
2-11. When undefined records are read, 



IOCS supplies the physical record size in 
the reqister. When undefined records are 
built, the programmer must load the length 
of each record (in bytes) into the register 
before he issues the PUT instruction for 
the record. This becomes the count portion 
of the CCW that IOCS sets up for this file. 
Thus it determines the length of the record 
to be transferred to the output device. If 
an undefined punch or printer output record 
contains a control character in the 
main-storage output area (DTFSR CTLCHR 
specified) , the length loaded into the 
RECSIZE register must also include one byte 
for this character. 

If record format is specified as UNDEF 
for a 1287 Optical Reader that is 
processing documents, RECSIZE contains only 
the length of the last field of a document 
read by the user-supplied channel command 
word chain. 

Note : When processing undefined records in 
document mode, the user can gain complete 
usage of the register normally used in the 
RECSIZE parameter. This can be 
accomplished by insuring that the 
suppress-length-indication (SLI) flag is 
always ON when processing undefined 
records. 

REWIND= 

If no specifications are given by the 
programmer, tape - files are automatically 
rewound, but not unloaded, on an OPEN or 
CLOSE instruction and on an end-of-volume 
condition. If other operations are desired 
for a tape input or output file, this entry 
may be included with one of the following 
entered immediately after the =sign: 

UNLOAD to rewind the tape on OPEN, 
and to rewind and unload on 
CLOSE or an end-of-volume 
condition. 

NORWD to prevent rewinding the tape 

at any time. 

TPMARK=NO 

If this entry is included for unla beled 
tape files, a tapemark will not - be written 
as the first record on the tape. If 
omitted, a tapemark is written. 

For output files containing n onstand ard- 
tape labels , this specification must be 
included to prevent a tapemark from beinq 
written after the last nonstandard header 
label and before the first data record. If 
omitted, the tapemark is written. 

TRANS=Name 

This entry applies to an input file read 
from the IBM 2671. Paper Tape Reader, and it 
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specifies the symbolic name of a 
code-translation table. 

The input file records may be punched in 
5-, 6-, 1- , or 8-channel paper tape, using 
any one of several different recording 
codes. If a code other than EBCDIC is 
used, it must be translated to EBCDIC code 
for use in System/360 programming. For 
IOCS to perform this translation, the user 
provides a translation table and specifies 
the symbolic name of the table in this 
TRANS entry. Then the logical IOCS 
routines translate the paper tape code and 
make the record available to the programmer 
in usable. form directly in the input area, 
or in the work area if one is specified in 
the GET instruction. 

The translation table must conform to 
the specifications of the machine 
instruction TRANSLATE. 

TRUNCS=YES 

This entry applies to disk files with 
fixed- length blocked records 
(RECFORM=FIXBLK) when short blocks are to 
be processed. It must be included: 

• For an output file if the TRUNC macro 
instruction is to be issued in the 
problem program. 

• For an input file if the TRUNC macro 
was issued to write short blocks when 
the file was originally created. 



TYPEFLE= 

This entry must be included to specify the 
type of file (input, output, or combined) . 
One of these specifications is entered 
immediately after the = sign: 

INPUT must be specified for: 

2311 disk input files (with or 

without updating) 
2400 magnetic tape input files 
1442, 2501, 2520, 2540 card 

reader files 
1052 keyboard input (only the 

GET instruction may be 

issued) 
2671 paper tape files 
1285 optical reader files 
1287 optical reader files 

OUTPUT must be specified for: 
2311 disk output files 
2400 magnetic tape output 
files 

1442, 2520, 2540 card punch 
files 

1403, 1404, 1443, 1445 printer 
output 

1052 printer output (only the 



PUT instruction may be 
issued) 

CMBND must be specified for a 1442, 

2520, or 2540 card file that 
is to be updated. That is, 
card records are to be read, 
processed, and then punched 
(PUT) in the same - cards from 
which they were read. Thus 
input and output operations 
are combined for the same 
file. This operation can be 
performed in the IBM 1442 or 
2520, in the IBM 2540 if the 
punch-feed-read special 
feature is installed and cards 
are fed and read in the punch 
feed. (See P UT Macro : 
U pdat ing. ) 

From this specification, IOCS sets up 
the CCW for this file and generates the 
proper blocking or deblocking routines. 



UCS = 

This entry is used in conjunction with the 
CNTRL UCS macro instruction, which controls 
data checks resulting from unprintable 
characters in an IBM 1403 Printer with the 
Universal Character Set special feature. 
DTFSR UCS= should be specified if a program 
that includes CNTRL UCS will ever be 
executed in a system that utilizes a 1403 
without the UCS feature. CNTROL UCS issued 
for a non-UCS printer causes a command 
reject to occur and the system to enter the 
wait state. This DTFSR UCS= specification 
can be included to override the effect of 
command rejects. Either YES or NO may be 
specified after the = sign. 

YES must be included to ignore 

command rejects from a non-UCS 
printer and continue 
processing. 

NO may be specified. If it is, a 

command reject is accepted and 
the system enters the wait 
state. If DTFSR UCS= is 
omitted, UCS=N0 is assumed. 

This DTFSR UCS specification is 
generally omitted if a program will always 
be executed in a system that includes a 
printer with the UCS feature. 

UPDATE=YES 

This entry must be included if a di.sk, input 
file (TYPEFLE= INPUT) is to be updated . 
That is, disk records are to be read, 
processed, and then transferred back (PUT) 
to the same disk-record locations from 
which they were read. 
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VAEBLD=n 

Whenever variable-length blocked records 
are built directly in the output area (no 
work area specified) , this entry must be 
included. It specifies the number (n) of a 
general- purpose register, which will always 
contain the length of the available space 
remaining in the output area. Any register 
2-11 may be specified. 

After the PUT instruction is issued for 
a variable-length record, IOCS calculates 
the space still available in the output 
area, and supplies it to the programmer in 
this VARBLD register. The programmer then 
compares the length of his next 
variable-length record with the available 
space to determine if the record will fit 
in the area. This check must be made 
before the record is built. If the record 
will not fit, the programmer issues a TRUNC 
instruction to transfer the completed block 
of records to the tape file. Then the 
present record is built at the beginning of 
the output area, as the first record in the 
next block. 



VERIFY=YES 

This entry is included if the user wants 
disk records to be checked after they are 
written. If this entry is omitted, any 
records written on disk are not verified. 



WLRERR=Name 

This entry applies only to disk or tape 
input files. It specifies the symbolic 
name of. a user's routine to which 
programming will branch if a wrong-length 
record is read. In hj.s routine the user, 
can perform any operation he desires for 
wrong-length records. However, he must not 
issue any GET macro instructions for this 
file. Also, if he uses any other IOCS 
macros in his routine, he must save the 

I contents of Registers 14 and 15 and restore 
them prior to returning to IOCS. The 
address of the wrong-length record is 
supplied by IOCS in Register 1. At the end 
of his routine, the user must return to 
IOCS by branching to the address in 
Register 14. 

Whenever fixed-length blocked records or 
variable-length records are specified 
(RECFORM=FIXBLK, =VARUNB, or =VARBLK) , the 
machine check for wrong-length records is 
suppressed and IOCS generates a programmed 
check of record length. For fixed-length 
blocked records, record length is 
considered incorrect if the physical disk 
or tape record (gap to gap) that is read is 
not a multiple of the logical- record length 
(specified in DTFSR RECSIZE) , up to the 



maximum length of the block (specified in 
DTFSR BLKSIZE) . This permits the reading 
of short blocks of logical records, without 
a wrong-length-record indication. 

For variable-length records, record 
length is considered incorrect if the 
length of the disk or tape record is not 
the same as the block length specified in 
the first two bytes of the block. 

When fixed-length unblocked records are 
specified (RECFORM=F IXUNB) , IOCS checks for 
a wrong-length-record indication that may 
have been set as the result of an I/O 
operation. 

If this WLRERR entry is omitted from the 
set of DTFSR entries but a wrong-length 
record is detected by IOCS, one of the 
following will result: 

• If the DTFSR ERROPT entry is included 
for this file, the wrong-length record 
will be treated as an error block and 
handled according to the user's 
specifications for an error (IGNORE, 
SKIP, or Name of error routine) . 

• If the DTFSR ERROPT entry is not 
included, the job will be terminated. 

The WLRERR entry does not apply to 
undefined records on tape. However, a 
WLRERR routine may be used to handle 
undefined records on disk. 



WORKA=YES 

Input/ output records can be processed, or 
built , 4 in work areas instead of the 
input/output areas. If this is planned, 
this WORKA=YES entry must be included, and 
the programmer must set up the work area (s) 
in main storage. Then the symbolic name, 
used in the DS instruction that reserves 
the work area must be specified in each 
GET, or PUT, instruction. On a GET or PUT, 
IOCS moves the record to, or from, the 
specified work area. 

Whenever this entry is included for a 
file, the DTF entry IOREG must be omitted. 
When variable-length records are used, 
WORKA must be defined to start on a 
halfword boundary. This entry is not 
applicable when documents are being 
processed on the 1287. 



DIRECT ACCESS METHOD (DTFDA) 

The DTFDA detail entries that apply to a 
file when records are processed by the 
direct access method are explained in the 
following text and shown in DTFDA Entries 
(Figure 36) . 
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AFTER=YES 

This entry must be included if any record 
is to be added to a file following the last 
record previously written on a track. That 
is, whenever the macro instruction WRITE 
Filename T AFTER w3.ll be used in a program, 
this entry is required. 



key area and data area of a record (see 
I0AREA1 and Figure 15) . If a file is to be 
created or if records are to be added to a 
file, the count area of the records must be 
included in this specification. 

IOCS uses this specification to 
construct the count field of the CCW for 
reading or writing fixed-length records. 



BLKSIZE=n 

This entry indicates the size of the I/O 
area by specifying the maximum number (n) 
of characters that will be transferred to, 
or from, the area at any one time. When 
undefined records are read or written, the 
area must be large enough to accommodate 
the largest record. 



CONTROL= YES 

This entry must be included if a CNTRL 
macro instruction will be issued for this 
file. A control command issues orders to 
the disk drive to perform the non-data 
operation SEEK. 



If key length is specified by DTFDA 
KEYLEN and if macro instructions that 
transfer the key areas of records will be 
issued, this area must provide for both the 



DEVICE=DISK1 1 

This entry must be included to state that 
the logical file is on a 2311 disk drive. 
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NAME 


OPERATION 


OPERAND* 


MUST BE INCLUDED 


REMARKS * 


Filename 1 


DTFDA' 




Each file 


Header Card. Specify symbolic filename. 






AFTER=YES 


Record reference AFTER used for 
an output record 








*BLKSIZE = n 


Each file 


Length of I/O area. 

n = maximum number of characters. 






CONTROL=YES 


CNTRL macro used 








»DEVICE = DISK11 


Each file 








»ERRBYTE = Name 


Each file 


Symbolic name of 2- byte field for 
error/status codes supplied by IOCS. 






IDLOC = Name 


ID of same or next record to be 
supplied by IOCS 


Symbolic name of 5- byte field for ID. 






'IOAREAI =Name 


Each file 


Symbolic name of input/output area. 
Same as used in DS. 






KEYARG = Name 


Record reference by key 


Symbolic name of key field. 






KEYLEN = n 


Records contain key areas 


All keys must be the same length. 

n = length of keys. j 






LABADDR= Name 


Check/write additional labels 


Symbolic name of user's label routine. 






READID = YES 


Record reference by ID used for 
an input record 








READKEY = YES 


Record reference by key used for 
an input record 








RECFORM = FIXUNB 


Fixed- length records 


If this entry is omitted, IOCS assumes 
FIXUNB. 


UNDEF 


Records not fixed-length, or 
Records added to a file and EOF 
record written 






RECSIZE = n 


Undefined records 


n = number of a register 2-11. 






t feci/ Ann K.I 

T SEEKADR= Name 


Each file 


ell* fit r f • 1 i 

Symbolic name of track- reference field. 
Field is 8 bytes long. 






SRCHM = YES 


Search multiple tracks 


Applies to record reference by key. 






*TYPEFLE = INPUT 


Each file 


Read and check standard labels. 


OUTPUT 


Write standard labels. 






VERIFY = YES 


Check record written on disk 








WRITEID=YES 


Record reference by ID used for 
an output record 








WRITEKY = YES 


Record reference by key used for 
an output record 








XTNTXIT = Name 




Symbolic name of user's extent routine. 


' Must be included. Other entries are included when applicable. 

*When two choices are shown, select only the appropriate one and enter it after the =sign. 

*The header card and each detail card except the last one used in a file set must contain a continuation punch 
in column 72. Each detail card except the last one used must also contain a comma after the last operand. 

In all entries: Solid caps must be entered as shown (For example, AFTER=YES) 

Lower- case letters are to be replaced by programmer's symbolic name or a number (For example, Filename 
in header card, or BLKSIZE = n where n is replaced). 

n is a decimal self- defining value. 



Figure 36. DTFDA Entries 
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EERB YTE=Name 

This entry is required for IOCS to supply 
indications of exceptional conditions to 
the problem program. The symbolic name of 
a 2-byte field, in which IOCS can store the 
error-condition- or status codes, is entered 
in this card after the = sign. 



The codes are available for testing by 
the problem program at WAITF time, after 
the transfer of a record has been 
completed. One or more of the following 
codes may be set by IOCS in the bits 
indicated: 



i r 

Byte 



Bit 



Fosition 



Hex Value 



Error/Status Code 



Remarks 



80 
40 



20 
10 
08 



04 
02 
01 



Wrong-length record 



No room found 



For fixed unblocked records, 
wrong blocksize specified 
while using READID, WRlTEID, 
READKEY, and WRITEKY. 



Occurs only on WRITEAFTER, 
No room to write record 
on track specified. 



80 

40 
20 

10 

08 

04 

02 
01 



Data check in count area 



End of cylinder 



Data check when reading 
key or data 



No record found *) 



End of file 



Data error detected. 
Occurs when reading or 
searching a count field, 



Occurs when record is 

not found on specified cylinder 

while using SRCHM 

Data error detected when 
reading key or data, or 
while searching keys. 

Occurs when searching 
ID or key without SRCHM 
and ID or key is not found 
in specified track. 

Count field with data 
length of zeros detected. 



*) If the Read ID command is issued for an ID one greater than the highest ID on a 
track, record 1 of that track will be read and no NRF condition is posted in the 
ERRBYTE. The user may use DTFDA parameter IDLOC=name, which supplies the ID of the 
next record to the problem program, to handle this specific type of NRF. 

N ote : Any bits that were set on by one I/O operation are reset 
before another I/O operation is started. 



IDLOC=Name 

This entry is included if the programmer 
wants. IOCS to supply the ID of a record 
after each READ or WRITE instruction is 



executed for specified records. The 
symbolic name of a 5-byte field., in which 
IOCS is to store the ID, is specified after 
the = sign in this parameter. 
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IOCS supplies the ID of the record 
specified in the READ/WRITE instruction, or 
the ID of the next record on the track. 
This is affected by the type of record 
reference specified in the READ/WRITE 
instruction and by the use of the SRCHH 
specification to search multiple tracks for 
a particular key (Figure 37) . 



IOAREA 1 = Name 



This entry must be included to specify the 
symbolic name of the input/output area used 
by this file. The input/output routines 
will transfer records to or from this area. 
The specified name must be the same as the 
name used in the DS instruction that 
reserves this area of main storage. 



The main-storage input/output area must 
be large enough to contain the maximum 
number of bytes that will be reguired in 
any READ or WRITE instruction issued for 
this file in the problem program. This is 
affected by the length of record data 
areas, and by the use of the count and key 
areas as follows: 



• If undefined records are specified in 
the DTFDA entry RECFORM, the area must 
provide for the largest data record 
that will be processed. 



• If the DTFDA entry KEYLEN is specified 
and if any instructions that read or 
write the key area of a record are to 
be issued in the problem program, the 
input/output area must provide room for 
the key area as well as the data area. 
The length needed for the key is the 
length specified in KEYLEN. 



• If any write instructions that transfer 
the count area to a disk record will be 
issued in the problem program, eight 
bytes of main storage must be allotted 
at the beginning of the I/O area. In 
these eight bytes IOCS will construct 
the count field to be transferred to 
disk . 



Whenever a READ or WRITE instruction is 
issued, IOCS assumes that the input/output 
area (see Figure 15) contains the 
information implied by the type of 
instruction that is to be executed (Figure 
38) . 



MACRO INSTRUCTION 


ID SUPPLIED 


With SRCHM 


Without SRCHM 


READ filename, KEY 


Same record 


Next record 


READ filename, ID 


1 1 n\/n 1 I ri 1 
^1 1 IVU i 1 U J 


Next record 


WRITE filename, KEY 


Same record 


Next record 


WRITE filename, ID 


(Invalid) 


Next record 


WRITE filename, RZERO 


(Invalid) 


None 


WRITE filename,AFTER 


(Invalid) 


None 



Figure 37. ID Supplied After a READ or 
WRITE Instruction 



KEYARG=Name 

This entry must be included if records are 
to be identified by key. That is, if the 
macro instruction RE AD Filename, KEY or 
WRITE Filename,KEY will be issued in the 
problem program, this card is reguired. 
KEYARG specifies the symbolic name of the 
key field in which the user will supply the 
record key for the READ/WRITE routines. 

When record reference is by key, IOCS 
uses this specification at assembly time to 
construct the data address field of the CCW 
for search commands. 



KEYLEN=n 

This entry must be included if record 
reference is by key or if keys are to be 
read or written. It specifies the number 
(n) of bytes in each key. All keys must be 
the same length. If this entry is omitted, 
IOCS assumes a key length of zero. 

When record reference is by key, IOCS 
uses this specification to construct the 
count field of the CCW for this file. IOCS 
also uses this in conjunction with I0AREA1 
to determine where the data field in the 
main-storage I/O area is located (see 
IOAREA 1 ) . 



LABADDR=Name 

The user may reguire one or more labels in 
addition to the standard file label. If 
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so, he must include his own routine to 
check, or write, the additional labels. 
The symbolic name of his routine is 
specified in this entry. Programming 
branches to this routine after IOCS has 
processed the standard label. 

At the end of his routine, the 
programmer must return to IOCS by use of 
the LBRET macro. 

RE ADID=YES 

This entry must be included if any input 
records are to be specified by ID 
(identifier) in the problem program. That 
is, whenever the macro instruction READ 
filename, ID will be used in the program, 
this entry is reguired. 



READKEY= YES 

This entry must be included if any input 
records are to be specified by key in the 
problem program. That is # whenever the- 
macro instruction READ filename, KEY will be 
used in the program, this card is reguired. 



MACRO INSTRUCTION 


I/O AREA CONTENTS 


With KEYLEN 


Without KEYLEN 


READ filename, KEY 


Data 


(Invalid) 


READ filename, ID 


Key and Data 


Data 


WRITE filename., KEY 


Data 


(Invalid) 


WRITE filename, ID 


Key and Data 


Data 


WRITE filename,AFTER 


Count, Key, and Data 


Count and Data 



Figure 38. I/O Area Reguirements for DAM 



RECFORM= 

This entry specifies the type of records in 
the input* or output, file. Either of the 
following specifications may be entered 
immediately after the = sign: 

FIXUNB for fixed-length records. All 
records are considered 
unblocked in the DAM method. 
If the user wants blocked 
records, he must provide his 
own blocking and deblocking. 



UNDEF for undefined records. This 

specification is reguired: 



• Whenever records are not 
fixed-length. 



• If records are to be added 
to a file (RZERO or AFTER 
used in a WRITE 
instruction) and an 
end-of-file record will be 
written. 



RECSIZE=n 

This entry must be included if undefined 
records are specified (RECFORM=UNDEF) - It 
specifies the number (n) of the 
general-purpose register that will contain 
the length of each individual input or 
output record. This may be any register 
2-11. 

Whenever each undefined record is read, 
IOCS supplies the length of the data area 
of that record in the register. 

When an undefined record is to be 
loaded, added, or written in the file, the 
programmer must load the length of the data 
area of the record (in bytes) into this 
register, before he issues the WRITE 
instruction for the record. IOCS adds the 
length of the key area when reguired. 

When records are to be loaded or added 
to a file (RZERO or AFTER specified in the 
WRITE instruction) , IOCS uses the length in 
constructing the count area to be written 
on disk. 



SEEK ADR= Name 

This entry must be included to specify the 
symbolic name of the user's track- reference 
field. In this field the user stores the 
track location of the particular record to 
be read or written. The READ/WRITE 
routines refer to this field to determine 
which disk pack and which track on that 
pack contains the desired record. Whenever 
records are to be located by searching for 
a specified ID, the track reference field 
must also contain the number of the record 
on the track. 

The track-reference field is an 
eight-byte field (MBBCCHHR) , and the 
symbolic name labels the first byte (see 
Figure 16) . 
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The bytes are used for: 

M Symbolic unit number 

BB Reserved for IBM 2321 Data Cell 

Drive (BB=00 for 2311 disk address) 

CC Cylinder number (the first C=0) 

HH Head number (the first H=0) 

R Record number 



IOCS uses this specification to 
construct the data address field of the CCW 
for seek commands. When record reference 
is by ID, IOCS also uses this to construct 
the CCW data address field for search 
commands . 



VERTFY=YES 

This entry is included if the user wants 
records to be checked after they are 
written on disk. If this entry is omitted, 
any records written on disk are not 
verified . 



WRITEID=YES 

This entry must be included if the disk 
storaqe location for writing any output 
record is to be specified by record ID 
(identifier) in the problem program. That 
is, whenever the macro instruction WRITE ■ 
filename , ID will be used in the program, 
this entry is reguired. 



SRCHM=YES 



If input/output records will be identified 
by key, this entry may be included to cause 
IOCS to search multiple tracks for each 
specified record. The instruction READ 
filename , KEY or WRITE filename, KEY will 
cause a search of the track specified in 
the track-reference field and all following 
tracks in the cylinder, until the record is 
found or the end of the cylinder is 
reached. If the logical file ends before 
the end of the cylinder and the record is 
not found, the search continues into the 
next file, if any, on the cylinder. If the 
record is not found on the cylinder, the 
end- of-c ylinder bit in the error/status 
field is set on; the no-record-found bit is 
not affected. 

Without this entry, each search is 
confined to the specified track. In this 
case, if the record is not found, the 
no-record-found bit in the error/status 
field is set on. 



TYPEFLE= 

This entry must be included to indicate how 
standard volume and file labels are to be 
processed: 

INPUT Standard labels are to be read 

and checked. 

OUTPUT Standard labels are to be 
written. 

Because logical files on disk must 
always contain labels, this entry is always 
reguired . 



WRITEKY=YES 

This entry must be included if the disk 
location for writing any output record is 
to be specified by record key in the 
problem program. That is, whenever the 
macro instruction W RITE filenam e, KEY- will 
be used in the program, this entry is 
reguired. 



XTNTXIT=Name 

This entry is included if the programmer 
wants to process XTENT card information. 
It specifies the symbolic name of his 
extent routine. Whenever XTNTXIT is 
included, IOCS branches to the user's 
routine during the initial OPEN for the 
file. It branches after each specified 
extent has been completely checked and 
conflicts, if any, have been resolved. 

Upon entry to the user's routine, IOCS 
stores in Register 1 the address of a 
12-byte area from which the user can 
retrieve extent card information (in binary 
form) . This area contains: 

Bytes Content s 

0-1 Symbolic unit (hexadecimal 

representation of SYSnnn) 

SYSRES = 0000 
SYSRDR = 0004 
SYSLST = 0008 
SYSIPT = 000C 
SYSOPT = 0010 
SYSLOG = 0014 
SYS000 = 0018 
SYS001 = 001C 
etc. 

2 Extent type code (as specified in 

the XTENT card) 
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3 Extent sequence number (as 

specified in the XTENT card) 

4-7 Lower limit of the extent (track 

address - CCHH) 

8-11 Upper limit of the extent (track 

address - CCHH) 

Also upon entry to the user's extent 
routine, IOCS stores a return address in 
Register 14. Therefore, at the end of his 
routine, the user must branch to this 
address to continue processing. 



INDEXED SEQUENTIAL SYSTEM (DTFIS) 

The DTFIS detail entries that apply to a 
file when records are processed by the 
Indexed Sequential File Management System 
are explained in the following text and 
shown in DTFIS Entries - (Figure 39). 
Operand entries vary with the application, 
but name and operand must be included. 
Filenames should be unigue to each other to 
be cataloged properly into the core image 
library. The length of the filename is 
limited to five characters. 

ADAREX=Name 

For each new record inserted within an 
organized file, a record is entered in an 
overflow area. If the specified overflow 
area (s) becomes filled and more records are 
yet to be stored, ISFMS branches to the 
user's routine specified by this entry. 
The symbolic name of the user's routine is 
entered after the = sign in this entry. 

The user should specify an independent 
overflow area if one has not already been 
specified. Or, he should extend the size 
of the independent overflow area, if that 
is filled. For this, he supplies a new 
XTENT card for the independent overflow 
area and restarts the job at the point at 
which the overflow area was -exceeded. 

Note : If the CYLOFL option is taken, other 
additions may occur on cylinders where 
there is room for overflow records. The 
user, therefore, may desire to continue. 

CYLOFL =n 



This entry must be included if cylinder 
overflow areas are to be reserved for a 
logical file. A cylinder overflow area is 
located on each cylinder within the prime 
area of the data file. It contains records 
that overflow from tracks in that cylinder. 

To reserve the areas for cylinder 
overflow this card is reguired when a file 
is to be loaded onto disk and when records 
are to be added to an organized file. It 
specifies the number (n) of tracks to be 
reserved on each cylinder. 

If an independent overflow area is 
specified (by an XTENT card) alonq with the 
CYLOFL entry, overflow records are written 
in the independent overflow area after a 
cylinder overflow area becomes filled. 

CYNDEX=Name 

When a file is to be loaded onto disk, the 
user specifies the disk area to be used for 
the cylinder index (by including a Job 
Control XTENT card) . If the index exceeds 
this area as the file is being loaded, 
ISFMS branches to the user's routine 
specified by this entry. The symbolic name 
of the user's routine is entered after the 
= sign in this entry. 

The user must supply a new XTENT card for 
the cylinder index area and restart the job 
if the file is being loaded or extended. 



. DERREX=Name 

This entry must be included to specify a 
user's routine for uncorrectable disk 
errors. If any uncorrectable error is 
detected when records are transferred 
either to or from disk storage, ISFMS 
branches to this routine. The symbolic 
name of the user's routine is entered after 
the = sign in this entry. The user has the 
choice of continuing, but he should save 
the I/O and work areas. ' During a LOAD 
function, the job is terminated 
automatically for all the count, key, and 
data WRITE operations. This routine will 
also be entered if a No-Record-Found 
condition occurs and no RTRVEX is 
specified. 
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NAME 


OPERATION 


OPERAND* 


MUST BE INCLUDED 


REMARKS* 


Fi lename^ 


rvrpi^ f 

UlrlJ 




Fnrh flip 

LUCIl flic 


Header card* Specify symbolic file name* 






ADAREX=Name 


IOROUT specifies ADD or ADDRTR 


Symbolic name of user's routine for full overflow areas* 






CYLOFL=n 


Cylinder overflow areas 


May be specified alone or with an independent overflow area, 
n = number of tracks for each area. 






CYNDEX=Name 


IOROUT specifies LOAD 


Symbolic name of user's routine for full cylinder index area. 






^DERREX=Name 


Each file 


Symbolic name of user's routine for any uncorrectable disk error. 






^n<ik'yTMT=n 

UJI\A 1 IN 1 1 1 


Eoch f i Ig 








DTAREX=Name 


IOROUT specifies LOAD 


Symbolic name of user's routine for full prime data area. 






DUPREX=Name 


IOROUT specifies LOAD, ADD, 
or AnnRTR 


Symbolic name of user's duplicate-record routine. 






EOFADDR=Name 


Sequential processing 


Symbolic name of user's end-of-file routine. 






ILIDEX=Name 


TYPEFILE specifies SEQNTL or RANSEQ 
and SETL macro indicates ID 


Symbolic name of user's routine for an ID outside the file limits. 






IOAREAL=Name 


IOROUT specifies LOAD, ADD, 
ADDRTR 


Symbolic name of input/output area. Same as used in DS. 
At least one I/O area must be specified for a file. 






IOAREAR=Name 


TYPEFLE specifies RANDOM or 
RANSEQ 






IOAREAS=Name 


TYPEFLE specifies SEQNTL or 
RANSEQ 






IOREG=n 


Process records in I/O area 


n = number of register 2-11 




1 


f|OROUT=LOAD 
ADD 
RETRVE 
ADDRTR 


Each file 


Build or extend a file on disk. 
Insert new records in an organized file. 
Retrieve records for processing/updating. 
Insert and retrieve records. 






KEYARG=Name 


Retrieve records randomly, or 
sequentially starting by key 


Symbolic name of key field in main storage. 






t|<EYLEN=n 


Each file 


All keys must be the same length, 
n = length of key. (Maximum is 95) 






KEYLOC=n 


Blocked records 


n = hiah-order position of key field within each record 






MANDEX=Name 


IOROUT=LOAD and MSTIND=YES 


Symbolic name of user's routine for full master index area. 






MSTIND=YES 


Master Index 








tNRECDS=n 


Each file 


n = number of records in a block. For unblocked records, n = 1 . 






^RECFORM=FIXUNB 
FIXBLK 


Unblocked records 
Blocked records 


Applies to records in prime data area only. 






^RECSIZE=n 


Each file 


n = number of characters in each logical record. 






RTRVEX=Name 


If KEYARG is specified 


Symbolic name of user's routine for records not found. 






SQCHEX=Name 


IOROUT specifies LOAD 


Symbolic name of user's sequence -error routine. 






TYPEFLE=RANDOM 
SEQNTL 
RANSEQ 


IOROUT specifies RETRVE or ADDRTR 


Random processing. 

Sequential processing. 

Random and sequential processing. 



Figure 39. DTFIS Entries (Part 1 of 2) 
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NAME 


OPERATION 


OPERAND* 


MUST BE INCLUDED 


REMARKS* 






UPDATE=RANDOM 
SEQNTL 
RANSEQ 


Update records 


Random processing with updating. 

Sequential processing with updating. 

Random and sequential processing with updating. 






VERIFY=YES 


Check records written on disk 








+ WLRERR=Name 


Each file 


Symbolic name of user's wrongHength-record 
routine. 






WORKL=Name 


IOROUT specifies LOAD, ADD, 
or ADDRTR 








WORKR=Name 


TYPEFLE specifies RANDOM or 
RANSEQ and records are processed 
in a work area 








WORKS=YES 


TYPEFLE specifies SEQNTL or 
RANSEQ and records are processed 
in work areas 





t Must be included. Other entries are included when applicable. 

* When two choices are shown, select only the appropriate one and enter'it after the = sign. 

* The header card and each detail card except the last one used in a file set must contain a continuation punch 
in column 72. Each detail card except the last one used must also contain a comma after the last operand. 

In all entries: Solid caps must be entered as shown (For example, IOROUT=LOAD) . 

Lower-case letters are to be replaced by programmer's symbolic name or a number (For example, Filename 
in header card, or CYLOFL=n where n is replaced). 

n is a decimal self-defining value. 



Figure 39. DTFIS Entries (Part 2 of 2) 



DSKXTNT=n 

This entry must be included to specify the 
maximum number (n) of extents for this 
file. The number must include all the 
prime data area extents (if more than one 
disk area is used for the data records) , 
the master and cylinder index areas 
(treated as one extent) , and the 
independent overflow area, all of which are 
specified by XTENT cards. Thus the minimum 
number specified by this entry is 2: one 
extent for one prime data area, and one for 
a cylinder index. 



entered after the = sign in this entry. In 
the DTAREX routine, the user can issue an 
ENDFL instruction to prepare the organized 
file for closing. This permits the 
remaining records to be treated as 
extensions . 



To continue loading the file, the user 
must supply a new XTENT card for the data 
area and restart the job at the point at 
which the data area was exceeded. 



DTAREX=Name 

When a file is to be loaded onto disk, the 
user specifies the disk area to be used for 
data records (by including a Job Control 
XTENT card) . If the records reguire more 
than the allotted space as they are being 
loaded, ISFMS branches to the user's 
routine specified by this entry. The 
symbolic name of the user's routine is 



DOPREX=Name 

When records are loaded or added to a file, 
ISFMS checks for duplicate record keys. If 
a duplication is found, ISFMS branches to 
the user's routine specified by this entry. 
The symbolic name of the user's routine is 
entered after the = sign in this entry. 
The user need not terminate the job. He 
may continue if he desires. 
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EOFADDR-Name 

This entry must be included when a 
sequential retrieval operation is to be 
performed. It specifies the symbolic name 
of the user's end-of-file routine. ISFMS 
will branch to this routine when the 
end-of-file disk record is read. In his 
routine the user may perform any operations 
reguired for the end of the job, and he 
generally issues the CLOSE instruction for 
the file. 



ILIDEX=Name 

This. entry is included when records are to 
be retrieved in sequential order and 
retrieval is to start a specified ID. 
ILIDEX gives the symbolic name of the 
user's routine to which ISFMS will branch 
if an ID that is outside of the file limits 
(specified by XTENT cards) is supplied in 
the SETL idname field. Another SETL may 
then be issued with a new ID. An ESETL is 
not reguired in this routine. 



IOAREAL=Name 

This entry must be included when a file is 
created (loaded) or when records are added 
to an organized file. It specifies the 
symbolic name of the output area used for 
loading or adding records to the file. The 
specified name must be the same as the name 
used in the DS instruction that reserves 
this area of main storage. The ISFMS 
routines construct the contents of this 
area and transfer records from this area to 
disk storage. 

This main-storage output area must be 
large enough to contain the count area, key 
area, and data area of records. 
Furthermore, the data-area portion must 
provide enough space for the seguence-link 
field of overflow records whenever records 
are added to a file (Figure 40) . 



IOAREAR-Name 

This entry must be included whenever 
records are processed in random order. It 
specifies the symbolic name of the 
input/output area used for random retrieval 
(and updating) . The specified name must be 
the same as the name used in the DS 
instruction that reserves this area of main 
storage. 

This main-storage I/O (Figure 41) must 
be large enough to contain: 



• the data area of an unblocked record 
read from the prime data area. 



• the data area of a block of records 
read from the prime data area, or 

• the key area and the data area, 
including the seguence-link field, of a 
record read from an overflow area. 
This applies regardless of whether the 
logical file contains blocked or 
unblocked records, because all overflow 
records are unblocked. 



IOAREAS=Name 

This entry must be included whenever 
records are processed in seguential order 
by key, It specifies the symbolic name of 
the input/output area used for seguential 
retrieval (and updating) . The specified 
name must be the same as the name used in 
the DS instruction that reserves this area 
of main storage. 

This main-storage I/O area (Figure 41) 
must be large enough to contain: 

• the key and data areas of an unblocked 
record read from the prime data area, 

• the data area of a block of records 
read from the prime data area, or 

• the key area and the data area, 
including the seguence-link field, of a 
record read from an overflow area. 
This applies regardless of whether the 
logical field contains blocked or 
unblocked records, because all overflow 
records are unblocked. 



IOREG=n 

This entry must be included whenever 
records (blocked or unblocked) are to be 
retrieved and processed directly in the I/O 
area. It specifies the number (n) of the 
register that ISFMS can use to indicate the 
address of the data portion of the record 
that is available for processing. ISFMS 
puts this address in this register each 
time a READ, WRITE, GET, or PUT is 
executed. Any register 2-11 may be 
specified. 

Note : For sequential unblocked records, 
the key is at the beginning of the I/O 
area . 
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FUNCTION 


OUTPUT AREA REQUIREMENTS (IN BYTES) 


Count 


Key 


Sequence 
Link 


Data 


Load Unblocked Records 


8 


Key Length 





Record Length 


Load Blocked Records 


8 


Key Length 




Record Length x Blocking Factor 


Add Unblocked Records 


8 


Key Length 


10 


Record Length 


Add Blocked Records 


8 


Key Length 


C 


Record Length x Blocking Factor 

R* 


8 


Key Length 


10 


Record Length 


* Whichever Is Larger 



Figure 4 0. Output Area Eeguirements for Loading or Adding Records to a File by ISFMS 



FUNCTION 


I/O AREA REQUIREMENTS (IN BYTES) 


Count 


Key 


Sequence 
Link 


Data 


Retrieve Unblocked Records 




Key Length 


10 


Record Length 


Retrieve Blocked Records 








Record Length x Blocking Factor 




Key Length 


10 Record Length 


* Whichever Is Larger 



Figure 41. I/O Area Reguirements for Random or Seguential Retrieval by ISFMS 



Whenever IOREG is specified for a file, 
the program should not include both DTFIS 
entries WORKR and WORKS for that file. 



IOROUT= 

This entry must be included to specify the 
type of function to be performed. One of 
the following specifications is entered 
after the = sign. 



LOAD 



ADD 

RETRVE 
ADDRTR 



to build a logical file on 
disk or to extend a file 
beyond the highest record 
presently in an organized 
file. 

to insert new records into an 
organized file. 

to retrieve records from a 
file for either random or 
seguential processing and/or 
updating. 

to both insert new records 
into a file (ADD) and retrieve 



records for processing and/or 
updating (RTR) . 



In using ADD and ADDRTR, it is necessary 
to guard against losing records, should the 
problem program not reach normal end of job 
after the instructions are issued. The 
CLOSE macro updates the Format-2 label with 
the address of the last record written in 
the current overflow area. If the program 
aborts, CLOSE is not issued and updating 
will not occur. Future ADDS will destroy 
the seguential chain of the file and 
records may be lost. 



KEYARG=Name 



This, entry must be included for random 
retrieval (READ) or seguential retrieval 
(GET) beginning with key. It specifies the 
symbolic name of the main-storage key field 
in which the user must supply the record 
key to ISFMS. Whenever this entry is 
included, the DTFIS entry RTRVEX must also 
be included. 
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KEYLEN=n 

This entry must be included to specify the 
number (n) of bytes in the record key. All 
keys must be the same length (maximum 
length is 95 bytes) . 



KEYLOC=n 

This entry must be included if blocked 
records are specified in DTFIS EECFORH. It 
supplies ISFMS with the high-order position 
of the key field within the data record. 
That is, if the key is recorded in 
positions 21-25 of each record in the file, 
this card specifies 2.1 « 

ISFMS uses this specification to locate 
(by key) a specifi€d record within a block. 
The key area of a disk record contains the 
key of the highest record in the block. To 
search for any other record, ISFMS locates 
the proper block and then examines the key 
field within each record in the block. 



MANDEX=Name 

When a logical file is to be loaded onto 
disk, the user may reguest that the ISFMS 
build a master index (by specifying 
MSTIND=YES) . If so, the area reserved for 
the master index is also specified by a Job 
Control XTENT card. If the master index 
exceeds the allotted area as the file is 
being loaded, ISFMS branches to the user's 
routine specified by this entry. The 
symbolic name of the user's routine is 
entered after the = sign in this entry. 

The user must supply a new XTENT card 
for the master index area and restart the 
job if the file is being loaded. This may 
also necessitate a new XTENT card for the 
cylinder index area. If the file is being 
extended, the user must reorganize the 
file. 



MSTIND=YES 

This entry is included whenever a master 
index is used for a file. In this case, it 
is required when a file is loaded (to 
instruct ISFMS to build the index) and when 
records- are added to or retrieved from a 
file with a master index. 

ISFMS always builds a track index and a 
cylinder index, but the master index is 
optional. The master index, if used, is 
the highest level index, and it includes an 
index record for each track of the cylinder 
index. Thus, it points to the cylinder 
index on a search for a particular record 
(see Indices; Master Index ) . The location 



of the master index is specified by a Job 
Control XTENT card. 



NRECDS=n 

This entry is always reguired. It 
specifies the number (n) of logical records 
in a block (called the blocking factor) . 
The maximum number of records (n) that may 
be specified is 255. If unblocked records 
are specified (RECFORM=FIXUNB) , this card 
must specify "1". 



RECFORM= 

This entry specifies the type of records in 
the logical file. All logical records in 
the file must be fixed length. However, 
they may be either blocked or unblocked. 
One or the other of these specifications 
must be entered after the = sign: 

FIXUNB for unblocked records. 

FIXBLK for blocked records. With 

this specification the key of 
the highest record in the 
block becomes the key for the 
block and must be recorded in 
the key area. 

The specification that is included when 
the logical file is loaded into disk 
storage must also be included whenever the 
file is processed. 

Records in the overflow area(s) are 
always unblocked (see Addition of Records, 
and Overflow Areas ) , but that does not 
affect this entry. RECFORM refers to 
records in the prime data area only. 



RECSIZE=n 

This entry must be included to specify the 
number (n) of characters in a logical 
record. This is the length of the data 
area of each individual record. All 
logical records must be the same size. 



RTRVEX=Name 

If a specified record cannot be found in a 
retrieve function, ISFMS branches to the 
user's routine specified in this entry. 
The symbolic name of the user's routine is 
entered after the = sign in this entry. 
The job need not be terminated. If this 
occurred during a SETL, an ESETL must be 
issued prior to the next SETL. This entry 
must be included whenever DTFIS KEYARG is 
specified. 
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SQCHEX=Name 

When records are loaded onto disk, ISFMS 
checks the records for sequential order by 
key. If a sequence error is detected, 
ISFMS branches to the user's routine 
specified by this entry. The symbolic name 
of the user's routine is entered after the 
= sign in this entry. The user may do 
whatever he wishes with the record 
containing the error without terminating 
the loading process. 

TYPEFLE= 

This entry must be included when a 
retrieval function is to be performed. It 
specifies the type (s) of processing that is 
to be performed by the problem program for 
this file. One of the following 
specifications is entered after the = sign: 

RANDOM for random processing. Records 
are retrieved from the file in 
random order specified by key. 
Only READ instructions may be 
issued to transfer records to main 
storage. 

SEQNTL for sequential processing. The 
problem program specifies the 
f irst record to be retrieved, and 
thereafter ISFMS retrieves records 
in sequential order by key. The 
first record is specified by key, 
ID, or the beginning of the 
logical file (see SETL M acro) . 
Only GET instructions may be 
issued to transfer records to main 
storage. 

RANSEQ for both random and sequential 
processing. READ and/or GET 
instructions may be issued to 
transfer records. 

TYPEFLE is not required for leading or 
adding functions. 



UPDATE= 

This entry must be included if disk records 
are to be updated. That is, records are to 
be retrieved, processed, and then 
transferred back (WRITE or PUT) to the same 
disk records from which they were read. 
One of the following specifications is 
entered after the = sign: 

RANDOM for random processing with 

updating. Records (retrieved by 
READ instructions) are written 
back into the file by WRITE 
. instructions. RANDOM may be 
specified only if TYPEFLE 
specifies RANDOM or RANSEQ. 



SEQNTL for seguential processing with 

updating^ Records (retrieved by 
GET instructions) are written back 
into the file by PUT instructions 
(GET instructions for blocked 
records) . See Macro Instructions 
for Sequential Retrieval by ISFMS . 
SEQNTL may be specified only if 
TYPEFLE specifies SEQNTL or 
RANSEQ. 

RANSEQ for random or seguential retrieval 
with updating. Records (retrieved 
by READ or GET instructions) may 
be written back into the file by 
WRITE or PUT instructions. RANSEQ 
may be specified only if TYPEFLE 
specifies RANSEQ. 



VERIFY=YES 

This entry is included if the user wants 
records to be checked after they are 
written on disk. If this entry is omitted, 
any records written on disk are not 
verified. 

WLRERR=Name 

This entry must be included to specify the 
user's routine for wrong-length records. 
If a wrong-length record is detected when 
data is transferred to or from disk 
storage, ISFMS branches to this routine. 
The symbolic name of the user's routine is 
entered after the = sign in this entry. 

Note: An erroneous specification to ISFMS 
in RECSIZE, KEYLEN, etc., may cause a 
wrong-length record. 

WORKL=Name 

This entry must be included whenever a file 
is to be created (loaded) or records are to 
be added to an organized file. It 
specifies the symbolic name of the work 
area in which the user must supply the data 
records to ISFMS for loading or adding to 
the file. The specified name must be the 
same as the name used in the DS instruction 
that reserves this area of main storage. 

This work area must provide space for 
both the logical data record (data area) 
and the record key (for the key area of the 
disk record) when a file of unblocked 
records is created or when records are 
added to any file. To create a file of 
blocked records, however, the work area 
must provide space for data only. 

Due to record shifting in an ADD 
function, the original contents of WORKL 
will be changed. 
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WORKR=Name 

When records are processed in random order, 
this entry must be included if the 
individual records are to be processed in a 
work area rather than the I/O area. It 
specifies the symbolic name of the work 
area. This name must be the same as the 
name used in the DS instruction that 
reserves this area of main storage. This 
area must provide space for one logical 
record (data area) . 

When this entry is included and a READ 
or WRITE instruction is executed, ISFMS 
moves the individual record to, or from, 
this area. Whenever this entry is included 
for a file, IOREG should not be specified. 

WORKS=YES 

When records are processed in seguential 
order, this entry must be included if the 
individual records are to be processed in 
work areas rather than the I/O area. Each 
GET or PUT instruction must specify the 
symbolic name of the work area to, ox from, 
which ISFMS is to move the record. The . 
area must be large enough for one logical 
record (data area) and the record key (key 
area) for unblocked records. For blocked 
records, it must be large enough for data 
only. Whenever this entry is included for 
a file, IOEEG should not be specified. 



DEVADDR=SYSnnn is the symbolic unit 
address. 



AREA=abuck, where abuck is a symbolic name, 
unigue to this DTFSN, for a full word 
in the generated STR CCB (Figure 42) . 
Before every READ or WRITE to this 
line, abuck must be loaded with the 
starting address of the data area. 



LENGTH=lbuck, where lbuck is a symbolic 

name, unigue to this DTFSN, for a half 
word in the generated STR CCB. Before 
every READ or WRITE to this line, lbuck 
must be loaded with the length of the 
data. 



During processing with STR devices, bits 
are set in STR CCB byte 12 to indicate the 
current status of the file. Figure 43 
shows the conditions indicated by byte 12. 



In addition, each CCB generated by the 
DTFSN macro is preceded by a doubleword 
"user area", which the problem program may 
use for any purpose. For example, this 
area would be useful in providing 
information for multiline control during 
STR processing. 



PROCESSING WITH STR DEVICES (DTFSN, DTFRF) 

When STR macro instructions (READ, WRITE, 
etc.) are used in a program, the 
definition macros DTFSN and DTFRF must be 
used. Where other DTF macros are not used, 
the DTFRF and DTFSN macros for STR support 
should appear first in the problem program. 
When the problem program uses other DTF 
macros, the DTFRF should follow the DTFEN 
card . 

DTFSN Macro 



|Name JOp |Operand 



4 



+ 



| d tf name | DTFSN | DEVADDR=S YSnnn 
| | | AREA=abuck 

j | J LENGTH=lbuck 

i ' ' 



The DTFSN macro generates the STR channel 
command block (CCB) , channel command word 
(CCW) lists, and linkages to the READ, 
WRITE, and CNTRL routines for each line. 

The file definition macro DTFSN is coded 
as a keyword macro with three operands: 



Bytes- 



USER AREA 


ABUCK 

0 12 3 


RESIDUAL COUNT 
4 5 


TRANSMISSION INFORMATION 

FLAG 1 FLAG 2 
6 7 


SYMBOLIC UNIT ADDRESS 
8 9 


CCW LIST ADDRESS 
10 11 


STR FLAG 

12 


ERROR COUNT 
13 


LBUCK 
14 15 



\ 

V 

\ 

\ 

\ 

V 
\ 

\ 


















\ 

■\ 

\ 

Bits— «-\o 


i 


2 


3 


4 


5 


6 






PREP 


RD/WT 


INQ 


INQ 
RCVD 


LOST 
DATA 


USED 

BY 
IOCS 


SOPEN 


USED 

BY 
IOCS 



Figure 42. Expanded STR Channel Command 
Block (CCB) 
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|BYTE| 




BIT 


r ~ - ■ - 1 

CONDITION INDICATED | 




1 (ON) 


| 0 (OFF) | 


1 12 | 


0 - 


PREP 


CNTRL PREP issued 


| PREP not issued j 




1 - 


READ/WRITE 


READ or WRITE issued 


|READ or WRITE not issued | 




2 - 


INQUIRY 


CNTRL INQ issued 


JINQ not issued | 


I I * 


3 - 


INQ RCVD 


INQUIRY received 




I I * 

j j 

] j 
I I 


4 - 


LOST DATA 


Abnormal end of message (operator 
ronlv U\ was SDPci f ied . EOF bit 
|in transmission flag also will be 
on. DPDPndincr on thp instructions 
being executed, indicates: 

(1) SOPEN could not establish 
synchronism, or 

(2) lost or duplicate record 
| during a READ. 


I I 

I I 
I | 




5 - 


Used By IOCS 








6 - 


SOPEN 


SOPEN issued 


ISOPEN not issued | 




7 - 


Used By IOCS 







* To be tested by problem program 



Figure 43. Conditions Indicated by Expanded STR CCB, Byte 12 



DTFRF Macro 



i 1 1 

|Name |0p |Operand 



|endop|DTFRF|startaddr, reg 

I L I 



The DTFRF macro instruction is used to 
establish a base register which the problem 
program must use to reference the expanded 
STR channel command block (CCB) . 

The name field (endop) must contain the 
symbolic operand that is specified in the 
problem program's END card. 

In the operand field, "startaddr" must 
be the symbolic address of the first 
executable instruction of the problem 
program. "reg" is a general register 
(2-11) to be used as a base register. This 
register must not be used for any other 
purpose while it is being used for the 
DTFRF. 

This macro must precede the first DTFSN 
macro definition statement. 

These definition type macros (DTFSN and 
DTFRF) should precede the problem program 
and reside in. the first 16K of main 
storage. 



BINARY SYNCHRONOUS COMMUNICATION (DTFBS, 
DTFRF) 

When BSC support macros (READ, WRITE, etc.) 
are used in a program, the file-definition 
macros DTFBS and DTFRF must be used. The 
DTFRF and DTFBS macros should appear before 
the first executable instruction of the 
problem program. Where other DTF macros 
are used, the DTFRF and DTFBS should follow 
the DTFEN card. 



DTFBS Macro 



Name |0p |Operand 
1 1 



| DTFBS | DEVADDR=SYSnnn, 
| |AREA=name, 
| | LENGTH=name, 

I | BSCFLAG=name, 

| |RCOUNT=n 



The DTFBS macro generates the expanded BSC 
command control block (CCB) , linkages to 
the READ, WRITE, and CNTRL routines for the 
line and the channel programs (channel 
command word lists) used by these routines. 
It also generates a table of EBCDIC special 
characters containing the BSC control 
characters. 
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The BSC file definition macro, DTFBS, is 
coded as a keyword macro with five 
operands: 

DEVADDR=SYSnnn is the symbolic unit address 
of the IBM 2701, SDA II. 

AREA=name is the symbolic name to be 

assigned to the full word area address 
field in the expanded BSC CCB (Figure 
44) . 

LENGTH=name is the symbolic name to be 

assigned to the half-word length field 
in the BSC CCB (Figure 44) . 

BSCFLAG=name is the symbolic name to be 
associated with the first BSC flag 
byte. The problem program may use this 
optional name when referencing the flag 
bytes. (See Figure 44). 

RC0UNT=n is a count of the number of times 
operations ending in I/O errors are to 
be retried before returning to the 
problem program or issuing an 
operator's message. The maximum retry 
count that can be specified is 15. The 
suggested retry count is either three 
or seven with a higher retry count 
being recommended for higher speed 
lines. RCOUNT=3 is assumed if the 
RCOUNT parameter is omitted. 

The DTFBS macro generates an EBCDIC 
special character table containing the BSC 
control characters. This table may be 
referenced by the name IOBSCT. The table 
contains only the hexadecimal control 
characters (no other attributes) . The 
characters are in the same order as in 
Appendix M, Part 1 . 



During processing using BSC support 
macros, bits are set in the BSC flag bytes 
(bytes 16-19 of the CCB) and in the 
transmission flags (byte 7 of the CCB) to 
indicate the current status of the file. 
Figure 45 shows the conditions indicated by 
these bytes. I/O operations ending in 
errors are retried by BOS/BSC support up to 
the maximum count (RC0UNT=n) in an attempt 
to get the correct response or to read or 
write a message. 



If the retry count is exceeded, the 
following actions are taken by BSC Support 
error routines: 

• A three-part PIOCS message is issued 
with reply reguested for the command 
reject, eguipment check, data check, 
and overrun error conditions. 

• An operator awareness message is issued 
for the lost data, bus-out check, 
intervention reguired, and time out 
error conditions. These are also 
posted to the CCB (transmission flags) . 

Operator awareness messages are also 
issued and the job terminated for 
errors occuring on I/O operations 
initiated by the BSC error routines and 
for errors which are meaningless, or 
not defined for the I/O operation. 

• Other errors are posted to the expanded 
CCB (BSC flag bytes) . 

For detailed information on the messages 
issued by BSC Support, refer to IBM 
System/360 Basic Operating System, Operator - 
Messages (Form C24-5024) . 
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dtfhame — *~ 



dtfnameD 
(Normal CCB) «< 



I 

0 


AREA AD Dl 

1 


■■i 

IESS FIELD 

2 3 
^ 


RESIDUAL COUNT 

i iS 


TRANSMISSION FLAGS 

6 7 



SYMBOLIC UNIT ADDRESS 
8 9 


CCW LIST ADDRESS 
10 11 


— ; \ 

LENGTH FIELD 
12 ,13 


1 
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14 15 
it | 


16 ' 


BSC FLAC 


5 BYTES 

18 111 19 IV 
(-LS ,_1Z 
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20 


f" 1 — ' 

21 


USED BY IOCS 

22 . 23 


USED B' 

24 


r- IOCS 
25 


CHARACTER TABLE ADDRESS 
26 , 27 



N 



/ / 
I / 

1 / bits- 
^Transmission Flags 
\ (byte 7) 
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5 


6 


7 


BSC Lost 


BSC Bus- 




BSC Int. 




Unit 


BSC 




Data 


Out Check 




Req. 




Exception 


Time Out 





bits—* 
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6 


7 


Completion Byte 
(byte 16) 
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I/O Error 


Msg» Format 
Error 


Reply 4 




Inval. ID 
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Wrong 
ACK 



OPSW 

A 



DIALSW 



Note: All bits are set ON by PIOCS; 
Figure 4P. Expanded BSC Command Control Block (CCB) 
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bits-* 
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4 
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7 
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Used by 
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NAK 


ENQ 


DLE EOT 


EOT 


WABT 


(byte 17) 


IOCS 


IOCS 















| bits-* 
, IDIAL Byte 
(byte 18) 


0 

RD 


1 

WT 


2 

CALL 


3 

ANS 


4 

IDSW 


5 

CNTRL OP 


6 

BOPEN 


7 

IDIAL 

Expt. 






i bits— J 
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BYTE 


BIT 


CONDITION INDICATED 


1 \w IN } 


U ^frTJ 


16 


*0 


Normal I/O operation completion 


I/O operation did not reach normal completion 




*1 


I/O error detected (see Appendix AA, Part 2) 






*2 


Message format error detected (see Appendix M, Part 2) 


No message format errors detected 




3 


Operator reply 4 specified 






4 


Not used 






*5 


Invalid ID~sequence received 






*6 


Unexpected response received 






*7 


V/rong alternating acknowledgment (ACK) received 




17 


0 


Used by IOCS 






1 


Used by IOCS 






2 


Not used 






*3 


NAK control character received in response to ENQ 






*4 


ENQ control character received instead of a message 
or 

ENQ control character received in response to ENQ (contention for 
the line) 






*5 


Disconnect sequence (DLE EOT) received 






*6 


EOT (end of transmission signal received) 






*7 


WABT sequence received 




18 


0,1 


OPSW — set by 1 DIAL 

1 1 \A#TV /l«_..#>__...~_l \A/DITC\ 

1 I — WIa (transparent WKIIt; 
10— RD (READ) 

1 W 1 ^WRIICy 






2,3 


Dl A| <;w «>t hv IDIAI 

00--NO (leased line) 

10--CALL (calling) 
1 l-MAN (manual) 






4 


ID-verification to be included 


No ID~verification to be included 




5 


CNTRL operation being initiated 






6 


oUrtN issued 


BUrtlN not issued 




7 


IUIAL macro should oe coded following ourtiN ^uial^tco/ 


IDIAL has been completed if required, or IDIAL is not necessary 


19 


0 


Disable command issued 






1 


Conversational wkiic issued 






2 


t-iN i kl cu i issued 






3 


i^lNiKL utsconnecr ^ujl; issuea 






4 


CNTRL WABT issued 






5 


Used by IOCS 






6 


CNTRL ENQ issued ** 


ENQ not issued 




7 


CNTRL Prepare (PRP) issued 


PRP not issued 


* Should be checked by the user (see Appendix M, Part 2 ). 
** Set with PRP issued for conversational mode. 





Figure 45. Conditions Indicated by BSC Flags, Bytes 16-19 of CCB 
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Before any READ, WRITE or IDIAL macro 
(except BEAD ENQ-type TQ) , the area address 
field and length field must be properly set 
up. Normally, the two fields contain the 
starting address and the length of the data 
area, respectively. 

For a conversational WRITE (type TC or 
TV), the length field should contain 
X'FFFF'. The area address field should 
point to a parameter list that contains the 
starting addresses and lengths of the WRITE 
data area and the READ data area. 

For a READ with leading graphics (type 
TG or TL) , the length field should contain 
the length of the READ data area. The area 
address field should point to a parameter 
list that contains the starting address of 
the READ data area and up to seven graphic 
characters (the first of which is preceded 
by a binary count) . 

DTFRF Macro 



i 1 — ■ i 1 

|Name |0p |Operand | 

i — ■——{ ^ ■ ■ — i 

| end op | DTFRF | startaddr ,r eg | 
i i i i 



The DTFRF macro instruction is used to 
establish a base register for referencing 
information stored in a BSC CCB (command 
control block) . If this macro is used, the 
base register specified by "reg" must be 
maintained or must be reloaded with the 
proper address before referencing a BSC CCB 
or ex-ecu ting any BSC macro instruction. It 
should be coded after the DTFEN card and 
before the DTFBS macro. 



The name field (endop) must contain the 
symbolic operand specified on the problem 
program END card. 



In the operand field, "startaddr" must 
be the symbolic address of the first 
executable instruction of the problem 
program. "Reg" is the general register 
(2-11) to be used as a base register. 



These file definition macros (DTFBS and 
DTFRF) should precede the problem program 
and reside in the first 16K of main 
storage. 
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NAME 


OPERATION 


OPERAND 


APPLIES TO 


MUST BE INCLUDED 


REMARKS 


2311 

DISK DRIVE 


2400 MAGNETIC 
TAPE UNIT 


1442/2501/2520 
2540 READER 


1 442/2520/2540 
PUNCH 


1403/1404/1443/ 
1445 PRINTER 


1052 PRINTER- 
KEYBOARD 


2671 PAPER 
TAPE READER 


1285 OPTICAL 
READER 


Filename 


DTFPH 




X 


X 














Labelled DiskAape File 


Symbolic File Name 






DEVADDR=SYSnnn 




X 














Labelled Tape File 


Symbolic Unit for the 
Device Used for the 
File. 






LABADDR=Name 


X 


X 














Check/Build Additional User- 
Standard Labels 


Symbolic Name of 
User's Label Routine. 
For Tape Input and Disk 
Files, Applies to Header 
Labels Unly . 






mountd=all 
"single 


X 
















Each Disk File 


All Extents Are to Be 
Available at the Initial 
OPEN. 

Only the First Extent 
Is to Be Available at 
the Initial OPEN. 






TYPEFLE^NPUT _ 
OUTPUT 


X 


X 














Labelled Disk/Tape Input File 
Labelled Disk/Tape Output File 








XTNTXIT=Name 


X 


















Symbolic Name of 
User's Extent Routine. 



Figure 4 6. DTFPH Entries 



PHYSICAL IOCS (DTFPH) 

When physical IOCS macro instructions 
(EXCP, WAIT, etc) are used in a program, 

only disk or tape files with standard 

labels need to be defined by DTFPH entries 
(DTF for a file handled by physical IOCS). 

No other files require definition. 

If a disk or tape file with standard 
volume and file labels is processed, a 
DTFPH header card and five detail cards may 
be used (Figure 46). This 6-card set 
indicates to IOCS that labels are to be 
read and checked (on input) or written (on 
output) . The header card is punched with 
DTFPH in the operation field, the symbolic 
name of the file in the name field, blank 
in the operand field, and a continuation 
punch in column 72. The symbolic name may 
be seven characters long. 

The keyword parameters may be specified 
in one or more detail cards (see Fil e 
Def inition Mac r os: Logical IOCS ) , or in 
the header card if desired. Specifying the 
parameters in the header card eliminates 



the need for the detail card(s) and the 
continuation punch in the header card. 



DEVADDR=SYSnnn 

This entry specifies the symbolic unit 
(SYSnnn) to be associated with this logical 
file. The symbolic unit represents- an 
actual I/O device address. The symbolic 
unit may be: 

SYSIPT for main system input device 

SYSOPT for main system output device 

SYS000-SYS254 for other devices in the 
system 

The symbolic unit (SYSnnn) is used in 
the Job Control ASSGN card (or in the 
Supervisor-Assembly macro SYMUN) to assign 
the actual I/O device address to this file. 
If the ASSGN card is used to assign the 
device for program execution, the file of 
records can be read from or written on 
different units at different times. For 
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example, a reel of tape may be mounted on 
any tape drive that is available at the 
time the job is ready, to be run, by merely 
assigning that drive to the symbolic unit. 



LABADDR=Name 

The user may require one or more disk, or 
tape, labels in addition to the standard 
file labels. If so, he must include his 
own routine to check (on input) or build 
(on output) his label (s) . He specifies the 
symbolic name of his routine in this entry, 
■and. IOCS branches to his routine after the 
standard label has been processed. 

LABADDR may be included to specify a 
user routine for header cr trailer labels 
as follows: 

• Disk input or output file: header 
labels only 

• Tape input file: header labels only 

• Tape output file: header and trailer 
labels 

Thus, if LABADDR is specified for the file, 
user-standard h eader labels can be 
processed for an input/output disk or tape 
file, and user-standard trailer labels can 
be built for a tape output file. Similar 
to the functions performed by logical IOCS, 
physical IOCS reads input labels and makes 
them available to the user for checking, 
and writes output labels after they are 
built. 

LABADDR allows one user's label routine 
to be specified for all types of labels for 
the file: header labels, end-of-file 
labels, and end-of-volume labels. On an 
input file, the user can determine the type 
of label that has been read by the 
identification in the label itself. For an 
output tape file, however, IOCS indicates 
to the user the type of label that is to be 
written. For this, IOCS supplies a code in 
the low- order byte of Register 0, as 
follows: 

0 - Header label (letter 0) 
F - End-of-file label 
V - End-of-volume label 

In his routine the user can test this byte 
and then build the appropriate type of 
label. 

Logical IOCS uses general registers 14 
and 15 for linkage to and from a called 
routine; therefore, these registers must 
not be destroyed. If they are required by 
the user's label routine, they must first 
be saved and then restored prior to 
returning to the mainline of the program. 



At the end of his label routine, the 
programmer must return to IOCS by use of 
the LBRET macro. 



MO0NTD= 

This entry must be included for a disk file 
to specify how many extents (disk areas) 
for the file are to be made available for 
processing when the file is initially 
opened. One of the following 
specifications is entered after the = sign: 

ALL if all extents on all packs 

are to be available for 
processing. When the file is 
opened, IOCS checks all labels 
on all packs and makes 
available all extents 
specified by the user's 
control cards. Only one OPEN 
is reguired for the file. ALL 
should be specified whenever 
the user plans to process 
records in a manner similar to 
that performed by the direct 
access method or the indexed 
sequential system. 

SINGLE if only the first extent on 

the first pack is to be 
available for processing. 
IOCS checks the labels on the 
first pack and makes the first 
extent specified by the user's 
control cards available for 
processing. The user must 
keep track of the extents and 
issue a subsequent OPEN 
whenever another extent is 
required for processing. On 
each OPEN after the first, 
IOCS makes available the next 
extent specified by the 
control cards. SINGLE should 
be specified when the user 
plans to process records in 
consecutive order. 

When the user issues a 
CLOSE for an output file, the 
pack on which he is currently 
writing records will be 
indicated, in the file label, 
as the last volume for this 
file. 

This entry must not be included for a tape 
file. 



TYPEFLE= 

This entry must be included to specify the 
type of file (input or output) . One 
specification or the other is entered 
immediately after the = sign: 
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INPUT for a disk or tape input file 



SUPER VIS OR -COMMUNICATION MACROS 



OUTPUT for a disk or tape output file 



XTNTXIT=Name 

This entry is included if the programmer 
wants to process XTENT card information. 
It specifies the symbolic name of the 
user's extent routine. 

Whenever XTNTXIT is included, IOCS 
branches to the user's routine during an 
OPEN for the file. If the DTFPH entry 
MOUNTD=ALL is also specified for the file, 
IOCS branches during the initial OPEN. It 
branches after each specified extent has 
been completely checking and after 
conflicts, if any, have been resolved. If 
MOUNTD=S INGLE is specified for the file, 
IOCS branches to the user's routine 
whenever an individual extent is opened. 
This includes both the initial OPEN for the 
first extent and each succeeding OPEN for 
additional extents. It branches after 
checking the extent. 

Upon entry to the user's routine, IOCS 
stores in Register 1 the address of an 
12-byte area from which the user can 
retrieve extent card information (in binary 
form) . This area contains: 



During problem program execution a 
Supervisor is located in lower main storage 
, and provides over-all control of 
operations. The functions performed by the 
Supervisor are interruption handling, I/O 
reguests, and program retrieval. The 
interruptions handled by the Supervisor 
result from five basic types of conditions: 



Bytes 
0 - 1 



Content s 

Symbolic unit (hexadecimal 
representation of SYSnnn) 



Conditions in the channel 
and/or I/O devices, such 
as the completion of an 
I/O operation. 

Improper specification or 
use of instructions and 
data. 

Machine malfunction. 

Signal from interruption 
key (operator) or timer. 

Execution of a Supervisor 
Call instruction to make 
use of a Supervisor 
function or to convey a 
message from the calling 
program to the 
Supervisor. 



The Supervisor also contains a 
commu nica t ion regi on that can be used for 
storing information useful to several 
problem programs or between problem 
programs. 

The region provides for: 



Input/Output 

Program Check 

Machine Check 
External Signal 

Supervisor Call 



SYSRES = 


0000 


• 


A user area for inter- or intra-program 


SYSRDR = 


0004 




communication. 


SYSLST = 


0008 






SYSIPT = 


oooc 


• 


Address of user-supplied routines for 


SYSOPT = 


0010 




program check, timer interruption, and 


SYSLOG = 


00 14 




operator communication to the problem 


SYS000 = 


0018 




program . 


SYS001 = 


00 1C 






etc. 






End-of-Supervisor address. 



4-7 



8-11 



Extent type code (as specified 
in the XTENT card) 

Extent seguence number (as 
specified in the XTENT card) 

Lower limit of the extent 
(track address - CCHH) 

Upper limit of the extent 
(track address - CCHH) 



Also upon entry to the user's extent 
routine, IOCS stores a return address in 
Register 14. Therefore at the end of his 
routine the user must branch to this 
address to continue processing. 



User program switches. 
Machine configuration. 
Date . 
Job name. 

Several macro instructions are available 
to the programmer to enable him to 
communicate with the Supervisor. Thus he 
can utilize the functions performed by the 
Supervisor or have access to the 
communication region in the Supervisor. To 
make use of the Supervisor functions 
reguires switching from problem state to 
Supervisor state. Therefore the macros 
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used for this purpose generate a Supervisor 
Call (SVC) instruction and a specific code 
to indicate the desired routine. These 
macros are: 

EXCP Execute channel program. 

FETCH Load a program or a program 

phase. 

EXIT Return from the timer or 

operator-communication routine 
to the problem program main 
line. 

MSG Transmit a message from the 

problem program to the 
operator via the Supervisor. 

The macros that provide access to the 
communication region are: 

COMRG To obtain the address of the 

communication region. 

MVCOM to move information to the 

communication region for 
modifying any portion of it. 

STXIT To place the address of a 

user's interruption routine in 
the communication region, or 
to change an interruption 
option. 

Two other macro .instructions are 
provided : 



FETCH Macro 



DUMP 



EOJ 



EXCP Macro 



Informs the Supervisor that 
the problem program has 
reached an end-of-job 
condition and that a storage 
print-out is desired. 

(End of job) . Informs the 
Supervisor that the problem 
program has been completed. 



1 — 1 ' 

|Name j Op 
| 1 


| Operand 


1 


I | EXCP 
1 — x 


H 

| blockname 
• 


, 

1 

. . j 



This macro instruction (execute channel 
program) is. issued to reguest that an I/O 
operation be performed. It causes physical 
IOCS (Channel Scheduler) to perform a start 
I/O operation. 

EXCP is used for a file of data that is 
controlled by physical IOCS macro 
instructions and it is described in the 
section Processing Records with Physical 

iocs. *~ 



I Name | Op | Operand 



| FETCH | name 
j ; i_ 



The FETCH macro instruction is issued 
whenever the program requires that another 
phase of the program, or a different 
program, be loaded for execution. The name 
of the phase or program is specified in the 
operand field, and it may be 1-6 characters 
long. 

Execution; Disk-Resident System 

When the FETCH macro instruction is 
executed in a disk-resident system, control 
is turned over to the System Loader 
(program-fetch routine) , which is one of 
the Supervisor routines. The System Loader 
then retrieves the specified program phase, 
program routine, or separate program, from 
the core image library. and loads it into 
main storage. The System Loader determines 
the proper phase (or program) to be 
retrieved by matching the name specified in 
the operand of the FETCH macro with the 
names in the directories of the core image 
library. After the phase is loaded, 
control is transferred to it at the address 
originally specified when the phase was 
stored in the core image library. If the 
phase requested cannot be found, a program 
check occurs (see Program Check ) . 

The program is loaded from the core 
image library, without relocation. 
Therefore it is the user's responsibility 
to ensure that the phase or program to be 
loaded does not contain assembled addresses 
that will load text into the main-storage 
area occupied by the Supervisor or by any 
portion of his program that will be 
required later. Aiso, the user must make 
provision for returning to his original 
program if that is reguired. 

Registers 12 and 13 are used by the 
Supervisor, and their contents are not 
saved or restored, unless SUPVR SAVEREG=YES 
was specified when the supervisor was 
assembled. (See Macro Instruction to 
Assemble a Superviso r. ) 

Additional information about libraries 
and the System Loader is given in the BOS 
Programmer's Guide , as listed on the front 
cover of "this publication. 

Execution: Not a Disk-Resident System 

If the disk-resident system is not used for 
execution of the object program, control is 
turned over to the Program Loader when the 
FETCH is executed. The Program loader must 
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be in main storage at this time, and it 
loads the next phase or program that is 
presently available in the system input 
device (designated by SYSIPT) . The system 
input device may be a card reader or a tape 
unit. Loading continues until the loader 
recognizes an XFR card or an Assembler END 
card with an operand, at which time control 
is transferred to the problem program. The 
XFR or END card contains the address at 
which execution of the program is to start. 



The program is load.ed from TXT or REP 
cards, without relocation. Therefore, it 
is the user's responsibility to ensure that 
the phase or program to be loaded does not 
contain assembled addresses that will load 
text intc the main-storage area occupied by 
the Supervisor, Program Loader, or any 
portion of his program that will be 
reguired later. Also the user must make 
provision for returning to his original 
program, if that is reguired, because the 
loader does not save and restore registers. 
Registers 1, 14, and 15 are destroyed by 
the loader. Registers 12 and 13 are used 
by the Supervisor, and may be used by the 
programmer if SUPVR SAVEREG=YES was 
specified when the supervisor was 
assembled. (See M acr o Instruction to 
Asse mble a Supervisor . ) 



Text and transfer cards (TXT and XFR or 
END) are output from the Assembler and 
input to the Program Loader. Replacement 
cards (REP) can be added to the object deck 
and used as input to the Program Loader. 

Additional information about the Program 
Loader and TXT, REP, XFR, and END cards is 
given in the BPS Programmer's Guide . 



Fetch Macro Source Statements 

Issuing the FETCH macro instruction in the 
source program causes several statements to 
be assembled, including the following: 



EXIT Macro 



1 - 

| Name | Op 

1 1 


i ■ ■- 

Operand 
1 


1 

1 

1 


J | EXIT 

| | EXIT 
■ i 


TR 
CR 


1 
1 

.. _ _ ... ... i 



The EXIT macro instruction is issued at the 
end of either the user's time- interruption 
routine or the user's operator 
communication routine, to return to the 
main line of the problem program at the 
point where the interruption occurred. 
This instruction reguires one ■ of the 
following operands: 

TR To return from the user's timer 
routine. 

CR To return from the user's 

operator-communication routine. 



MSG Macro 



1 — 1 

| Name 


Op 


T 

| Operand 


1 


1 1 

| Name 
i 


1 

MSG 


■{ 

| code, REPLY 
i 


1 

1 
i 



The MSG (message) macro instruction allows 
a user's problem program or an IBM-supplied 
program to give a message to the operator. 
It is used to indicate error conditions 
and/or to reguest an operator decision 
before proceeding further with processing 
of the problem program. 

This instruction can be labeled with a 
symbolic name and it can have one or two 
operands. The first operand (code) is the 
message to be communicated to the operator. 
It may contain 1-4 characters, which are 
generally a code or some meaningful 
characters such as ISEQ for 
input-seguence-error . 



Statement 



FETCH 

• 

SVC 
DC 



PHASE2 



CL6'PHASE2' 



Meanin g 

Macro instruction 



Supervisor Call 

6-byte phase or 
program name 



During execution, the Supervisor Call 
interruption routine analyzes the code and 
gives control to the appropriate loader 
(system or program) , depending on whether 
the program is executed in a disk system. 



The second operand (REPLY) is optional, 
and it is included only if further 
processing is dependent upon a response 
from the operator. For example, if 
ISEQ, REPLY is specified in the instruction, 
a reply from the operator is reguired. 
This reguest for a reply is indicated by 
the letter A following the message. The 
message printed or displayed in this case 
is ISEQA. 

The operator' s response to a message 
must be a one-character code as follows: 



Code 
0 



Meaning 

Terminate the job. 



Macro Instruction Statements 175 



1 Dump and terminate the job. 

2 Turn on program switch 7 in the 
UPSI byte of the communication 
region (see Figure 47, Byte 23) 
and return to the problem 
program. 

3 Turn OFF program switch 7 (UPSI 
byte) and return to the problem 
program. 

4 Ignore the indicated I/O error 
and continue processing if the 
message was initiated by 
physical IOCS. If not, return 
to the problem program. 

If STR routines are included in 
the assembled supervisor, the 
message is discontinued, but 
processing continues. The lost 
data and EOF bits in the 
Expanded STR CCB are set on. 

If BSC routines are included in 
the assembled supervisor, the 
transmission is, discontinued, 
but processing continues. The 
reply 4 bit in the expanded BSC 
CCB is set on. 

5 Retry the indicated I/O 
operation if the message was 
initiated by physical IOCS. If 
not, return to the problem 
program. 

6 Disable STR lines, dump the 
program, and terminate the job. 
If STR routines are not 
included in the assembled 
supervisor, the reply of 6 is 
an invalid reply and will be 
ignored. 

8 Terminate the BSC job by 

disabling the line, displaying 
the error statistics and 
transmission counts, clearing 
the BSC CCB table, and dumping 
the program before end of job. 
If BSC support routines are not 
includ-ed in the assembled 
supervisor, the reply of 8 is 
an invalid reply and is 
ignored. 

Other Return to the problem program. 

All Codes The reply code is returned to 
the program that initiated the 
message, and (except for 0, 1, 
6, or 8) can be tested by the 
program by addressing "Name+7". 

The MSG instruction can be used in a 
system that includes an IBM 10 52 Printer 



Keyboard, or in one that does not. However 
the operations differ. If a 1052 is 
available for messages from the MSG macro, 
it must be assigned to SYSLOG. Otherwise, 
the MSG macro cannot determine that the 
1052 is available and reacts as though it 
were not. When a 1052 is available, the 
message is automatically typed and the 
operator types the one-character response, 
if REPLY is specified and indicated by the 
letter A. Then the response, if any, is 
analyzed by the supervisor and processing 
continues. If an error is detected during 
printer-keyboard input/output, operation is 
executed as though there were no 
printer-keyboard available. If no reply is 
required, the message will be printed and 
processing will continue uninterrupted. 



When a 1052 is not available, 
programming waits (enters the wait state) 
and the operator can display the message on 
the console. The message and the response 
reguest (A) , if any, are stored in fixed 
main-storage positions 0-4. If a reply is 
required, the operator must press the stop 
key, store the one-character code in fixed 
main-storage position 5, and press the 
start key. To resume processing, the 
operator presses the interruption key. If 
a reply is not required, the operator need 
only press the interruption key to continue 
processing . 

Issuing the MSG macro instruction in the 
source program causes three statements to 
be assembled. For example: 

Statement 



NAME MSG ISEQ, REPLY 



NAME 



SVC 2 

DC CL4 , ISEQ« 
DC CL2»Ab' 



Macro Instruction 

Supervisor Call 
4-byte message 
1-byte position 
(A) indicates re- 
ply requested, and 
1-byte position 
(b) provides for 
reply. If a reply 
is not required, 
this statement is 
DC CL2'bb« 



During execution, the Supervisor 
interruption routine analyzes the code, 
stores the return address, moves the 
message to main-storage positions 0-4, and 
sets up the printer-keyboard (if available) 
for input/output operations. After the 
operator enters the response (either by the 
printer-keyboard, or by the console in 
main-storaqe position 5) , the Supervisor 
analyzes the response code, and performs 
the indicated function: 

• Terminates the job. (Code 0 or 1) 
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• Dumps and terminates the job. (Code 1) 



COHRG Macro 



Sets program switch 7. 
Code 3 = OFF) 



(Code 2 = ON; 



• The STR message is discontinued, but 
processing (on other lines or devices) 
continues. EOF is simulated with the 

• lost-data and EOF bits on in the 
expanded STR CCB (Code 4). 

'• The BSC transmission is discontinued, 
but processing continues (on other 
devices) . The reply 4 bit in the 
expanded BSC CCB is set on. 

• Retries the designated operation (Code 
5) • 

• Terminates an STR job. STR lines are 
disabled, and the problem program is 
dumped before the job is terminated, as 
with code 1 (Code 6) . 

• Terminates a BSC job. The BSC line is 
disabled, the error statistics and 
transmission count are displayed, the 
BSC CCB table is cleared, and the 
problem program is dumped before the 
job is terminated as with code 1 (Code 
8) . 

• Stores the code in the last byte of the 
assembled statements (byte M b" shown in 
DC CL2'Ab«) 

• Returns control to the problem program, 
at the instruction following the MSG 
macro unless the code is 0, 1, or 6. 

If the STR routines are not included in 
the assembled supervisor, a reply of 6 
is an invalid reply and will be 
ignored. The same applies to reply of 
8 if BSC routines are not included in 
the assembled supervisor. 

A MSG macro can be reused without 
resetting the reply byte (b) . 

Several programs supplied by IBM also 
utilize the MSG macro to give messages to 



i 1 1 

| Name | Op | Operand 

I 1 1 



| C0MRG| 

_l L 



The COMRG (communication region) macro 
instruction allows the program to have 
access to information stored in the 
communication region. The program can 
either use this information, or alter the 
information as stored. 



When this macro 
the address of the 
communication regi 
register 1. Using 
the program can th 
the communication 
has been executed 
communication regi 
1 may be used for 



instruction is executed, 

first byte of the 
on is loaded into 

this address as a base, 
en refer to any field in 
region. After the macro 
and reference to the 
on is completed, register 
other purposes. 



Communication Region ; Both the Supervisor 
and the problem program can use the 
communication region. A problem program 
can use the first 30 bytes of this storage 
area, which is arranged as shown in Figure 
47 and described here: 



Bytes 
0-8 



Field 

Calendar date (unpaged decimal) , 
available in two forms. 
For example: 081764230 

\a^b/ 

A = 8/17/64 

B = year' 64, 230th day 

The first six bytes supply the 
date in the form of month/day/year 
(A) . The last five bytes supply 
the date in the form of year, and 
day of the year (B) . Form B is 
used by the label routine. 

System configuration, represented 



the operator. These 


messages are numerical 


in binary form: 




codes 


that start with 
Displayed 


a specified digit: 


Bits Conf iquration 




Digit 


(On Console 




0-3 Number of bytes 


in ; 


(1052) 


Byte 0) 


Message from 


storage: 








0000 = 


8K 


0 


11110000 


IPL or Supervisor 


0010 = 


16K 


1 


111 10001 


Job Control 


0011 = 


24K 


2 


1 11 10010 


Linkage Editor 


0100 = 


32K 






or Program Loader 


0110 = 


64K 


3 


1 11 1001 1 


Other IBM programs 


1000 = 


128K 


4 


1 11 10100 


Logical IOCS 


1010 = 


256K 



Therefore, when the user establishes his 
messages, he should avoid using 0-4 in the 
first position of his message. 



Model (for diagnostic 
scan-out area) : 

0 = 30 

1 = other 
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5 Floating-point \ 

feature 1 1 = Present 

6 Decimal f 
feature / 0 = Not 

I Present 

7 Printer- 1 
Keyboard 

10-11 Address of the end of the 
Supervisor. 

12-19 User area for interprogram or 

intraprogram communication. These 
eight bytes are not reset by Job 
Control. 

20-2 2 User area for intraprogram 

communication. These three bytes 
are reset by Job Control. 

23 UPSI byte. User's program 
switches. 

24-29 Program name. The first six bytes 
of the name on the JOB card. 

30-3 9 Area used by the Supervisor to 

retain information applicable to 
the problem program being 
executed, e.g., addresses of 



user-supplied routines specified 
by the STXIT macro. 

40-45 Name of the last phase reguested 
by a JOB card or a FETCH macro 
instruction . 



MVCOM 


Macro 






i 1 

| Name 
| 


-j ■■ i 

1 Op | 


Operand 


— i 
1 

1 


1 
i 


_| 1- 

| MVCOM | 
i. . . i 


byte, n, location 


1 

i 



The MVCOM (move to communication region) 
macro allows the user to modify bytes 12-23 
in the communication region of the 
Supervisor. 

Before issuing the MVCOM macro, the user 
must set up the new information he wishes 
to insert in the communication region. 
Then when he issues the macro, he must 
specify three operands. He specifies the 
first byte that is to be modified in the 
communication region, the number of bytes 
to be modified, and the location of the new 
information. 





Date 




Month 


Day 


Year 


Day of 
Year 


Bytes* 


0 






8 



c 








o 








S 






8 


.2* 


e 




E 

o 


c 






Q_ 


o 

<J 




i£ 


J> 


9 


10 




11 



(Inter- program or Intra- 
program Communication) 



19 



(Intra -Program 
Communication) 



Program Name 



(Entered from 
Job Control) 



Area used by 
the Supervisor 



30 



39 



(Last Phase 
Requested) 



45 



Address of first 
byte supplied in 
COMRG macro 



1 Byte = 8 Bits 



Core 
Size 



i 0000= 8K 
| 0010= 16K 
! 0011= 24K 
0100= 32K 
0110= 64K 
1000=128K 
1010 = 256K 



-S2 o 
5 



5! o m £ 

□ 1U " ^ 

6 



2 O 



Present = 1 
Absent =0 



Figure 47. Communication Supervisor (in Supervisor) 
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The f irst operand (byte) specifies the 
first byte that is to be modified relativ e 
to the beginning of the communication 
region. For example, to modify the UPSI 
byte, 23 is punched. 



The second operan d specifies the number 
(n) of bytes to be modified. If only the 
OPSI byte in the previous example is to be 
altered, n equals 1. 



The third operand (location) specifies 
either the symbolic name of the 
main-storage location that contains the 
information, or the register that contains 
the address of the information. When a 
register is to be specified, it must be 
enclosed in parentheses, and it may be 
either a number or a symbolic name not 
exceeding six characters. 



Using this macro, a programmer might set 
up his program switches (UPSI) with the 
following coding: 

Name 0p_ Operand 



MVCOM 23,1, NEWUPSI 



Or, he might prefer to set his switches 
this way: 

Name Cjd Operand 



LA 5,NEWUPSI 



HERE 



HERE MVCOM 23, 1, (REG5) 



STXIT Macro 

i 1 

|0p jOperand 



| STXIT | n , pc-name,it-name,oc-name 



The STXIT (set exit) macro instruction can 
be used to activate the user's interruption 
routines. The user may provide four 
different routines to which programming 
automatically branches on certain 
interruption conditions: program-check 
interrupt- 
ion, interval-timer interruption, and 
operator communication I/O interruption 
(request key on the 1052) . The addresses 
of one or more of these four routines may 
be specified by one STXIT instruction. 

When the problem program is executed in 
a disk-resident system, the interval timer 
(it) and operator communication (oc) 
routines must not be located, or begin, in 
the first 2500 main-storage positions above 
the end of the^ Supervisor. 

Whenever this STXIT instruction is 
issued, the first operand must be included 
to specify the number (n) of a 
general- purpose register. The macro uses 
this register to refer to the address of 
the communication region. Any register 
1-11 or 14-15 may be specified. After the 
macro has been executed, the register may 
be used for other purposes. If this STXIT 
instruction is issued again later in the 
program, the same or a different register 
may be specified. 

Each of the ot her four ope r ands is 
optional. One or more operands are 
specified, depending on the routine (s) 
desired. Each operand specifies either the 
symbolic name of the user's routine or an 
action to be taken by the Supervisor. The 
STXIT macro stores this information in the 
Supervisor's area of the communication 
region. These names or actions must be 
entered in the operand field in the order 
shown: 

pc-name Symbolic name of user's 

program-check interruption 
routine, ABORT, or DUMP. 



In both examples, NEWUPSI could be defined 
this way: 



it-name Symbolic name of user's 

interval- timer interruption 
routine, or CLOSE. 



NEWUPSI DC 



X»57« 



oc-name Symbolic name of user's 

operator-communication I/O 
interruption routine, or CLOSE. 

If any name (s) is omitted but following 
names are to be included, a comma must be 
entered to indicate the omission. For 
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example, if this instruction is to specify 
Register 5, the name of a program-check 
routine (PROCHK) , and the name of an 
operator-communication routine (OPCOM) , it 
is written: 

STXIT 5,PR0CHK, , OPCOM 



Effe c t of CLOSE ; The addresses for the it 
and oc interruption routines can be cleared 
from the Supervisor area by specifying 
CLOSE as the operand in the STXIT macro. 
If an interruption occurs while a routine 
is closed (no address available) , the 
interruption is ignored. The IPL procedure 
also closes these three routines. 



Program Check 

When an interruption occurs due to a 
program check, the Supervisor turns control 
over to the user's routine, if that routine 
is presently active (specified by pc-name) . 
At the end of his routine, the programmer 
can return to the main line of his problem 
program by loading the address stored in 
the program-check old PSW into a register 
and branching to that address. 

A program check may occur if the problem 
program specifies erroneous information to 
the Supervisor, such as: 

• The program phase specified by a JOB 
card or the FETCH macro instruction 
cannot be found in the core image 
library. Byte 43 in main storage 
contains a hexadecimal value of 20. 
Bytes 40-45 of the communication region 
contain the phase name, which can be 
examined by the user's program check 
routine. However, if the DUMP option 
is used. Bytes 40-45 do not contain the 
phase name, and, instead, the phase 
name is listed on the first line of the 
printout. 

• The main storage size specified in the 
configuration byte of the communication 
region exceeds the storage actually 
available in the system. 

• The floating-point feature is specified 
as present in the configuration byte of 
the communication region, but it is not 
actually available in the system. 

• An invalid SVC (Supervisor call) code 
is used. The only valid SVC codes are 
those generated by the macros that 
communicate with the Supervisor (FETCH, 
EXCP, EXIT, MSG, DUMP, EOJ, the STR 
processing macros, STR device error 
routines, BSC support macros and BSC 
error routines) <. Byte 43 in main 
storage contains a hexadecimal value of 
10. 



If the user does not specify a routine, 
the actions that can be taken when a 
program check occurs vary depending on 
whether the object program is executed in a 
disk-resident system. 

No Use r R outine - Disk-Resi den t - Sys tem : 
Instead of specifying a routine, the user 
may specify either ABORT or DUMP in the 
STXIT macro instruction when the object 
program is to be executed in a 
disk-resident system. ABORT terminates the 
job; DUMP terminates the job and causes the 
contents of registers and main storage to 
be printed. The DUMP specification is 
always activated when Job Control is 
executed before the execution of the 
problem program. 

When a program check occurs, the 
Supervisor issues a MSG macro instruction 
with a message to notify the operator. If 
a 1052 printer-keyboard is available, the 
message is typed, the previously specified 
action (ABORT or DUMP) is taken, and the 
Job Control program is loaded into main 
storage to continue operation with the next 
job. If a 1052 is not available, however, 
the message is stored in main-storage 
positions 0-3 and the system enters the 
wait state. The operator can display the 
message and then press the interruption key 
to continue operation. At this time the 
specified action (ABORT or DUMP) is taken 
and Job Control is fetched to continue with 
the next job. 

No User Routine - f Not a Disk-Resident 
System : Instead of specifying a routine, 
the user may specify ABORT in the STXIT 
macro instruction when a disk-resident 
system is not to be used for program 
execution. The ABORT specification is 
initially set when the Supervisor is loaded 
into main storage. Job Control, if used, 
also sets program check to ABORT. (The 
user may specify DUMP but, if so, it is 
treated the same as ABORT. That is, no 
printing occurs.) 

When a program check occurs, the 
Supervisor issues a MSG macro instruction, 
terminates the job, and causes the system 
to enter the wait state. If a 1052 
printer-keyboard is available, the message 
is typed. If not, the message is stored in 
main-storage positions 0-3 and the operator 
can display it. The execution of a 
different program can then be initialized. 

Interval Time r 

When an interruption occurs due to the 
timer, the Supervisor turns control over to 
the user's routine if that routine is 
presently active (specified by it-name) and 
if TIMER was specified in the SUPVR macro 
instruction when the Supervisor was 
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assembled. The Supervisor saves the 
program status of the main line of the 
problem program so that programming can 
return to it at the end of the 
timer- in terruption routine. The Supervisor 
also saves the contents of general 
registers 10 and 11, so that these 
registers may be used in the timer routine. 
The last instruction in the timer routine 
should be the macro instruction EXIT TR. 
When this macro is executed, registers 10 
and 11 are restored to their original value 
and the program status is restored. 

Once a routine has been specified for an 
interval-timer interruption , that routine 
remains active until it is either cleared 
or replaced. It is cleared by the IPL 
procedure, or by issuing a STXIT n, , CLOSE 
instruction. It is replaced by issuing a 
STXIT instruction with a different it-name. 

If TR=YES was not specified in the SUPVR 
macro instruction at Supervisor-assembly 
time, or if a timer-interruption routine is 
not active, any interval-timer interruption 
that occurs is ignored. 

Op er ator Commu n ication 

If a 1052 printer-keyboard is available 
on-line, an operator can initiate a 
communication to cause any one of three 
actions: terminate a job, set a program 
switch, or branch to a user-supplied 
routine. However, if a 1052 is not 
available, only the first two actions can 
be initiated. 

1052 Ava ilab le: When an IBM 1052 
Printer- Keyboard is available, the operator 
can initiate a communication to the system 
by pressing the reguest key and then keying 
a one-character code. The code may be one 
of the following: 

Code M eaning 

Blank Continue processing. Reguest key 
pressed in error. 

0 Terminate the job. 

1 Print out the contents of 
registers and main storage , and 
terminate the job. 

2 Set program switch 7 in the UPSI 
byte of the communication region 
(see Figure 47, Byte 23) and 
continue with the problem program 

3 (Code 2=0N; Code 3=0FF) . 

6 Disable STR lines, dump the 

problem program, and terminate the 
job. If the STR routines are not 
included in the assembled 



supervisor, code 6 is an invalid 
reply and will be ignored. 

8 Terminate the BSC job by disabling 

the line and displaying the error 
statistics and transmission counts 
before end of job. If BSC support 
routines are not included in the 
assembled supervisor, the reply of 
8 is an invalid reply and is 
ignored. 

Other Turn control over to the user's 
operator-communication routine. 

When some code other than 0-3, 6, or 8 
is entered, the Supervisor turns control 
over to the user's routine if that routine 
is presently active (specified by oc-name) 
and if INQUIRY was specified in the SUPVR 
macro instruction when the Supervisor was 
assembled. The Supervisor saves the 
program status of the main line of the 
problem program so that programming can 
return to it at the end of the 
operator-communication routine. The 
Supervisor also saves the contents of 
general registers 10 and 11 so that these 
registers may be used in the 
operator-communication routine. In this 
routine, a GET instruction is issued for 
the printer-keyboard. The operator enters 
his reguest by keying a message that the 
routine has been programmed to analyze. 
The last instruction in the operator 
communication routine should be the macro 
instruction EXIT CR. When this macro is 
executed, registers 10 and 11 are restored 
to their original value and the program 
status is restored. 

Once a routine has been specified for an 
operator-communication interruption , that 
routine remains active until it is either 
cleared or replaced. It is cleared by the 
IPL procedure, or by issuing a STXIT n, , , 
CLOSE instruction. It is replaced by 
issuing a STXIT instruction with a 
different oc-name. 

If CR=YES was not specified in the SUPVR 
macro instruction at Supervisor-assembly 
time, or if an operator communication 
routine is not active, any code other than 
0-3 that is entered as an interruption 
reguest is ignored. 

1052 No t Available : When a 1052 is not 
available, the operator can initiate 
communication to the Supervisor only, not 
to a user routine. For supervisor 
communication, the operator stops the" 
system operation, enters a code 0-3, 6, or 
8 in fixed main-storage position 5, and 
presses the start and interruption keys. 
As described previously, code 0 terminates 
the job, code 1 causes a print-out and 
terminates the job, code 2 or 3 sets 
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program switch 7 (ON or OFF, respectively) 
and permits processing tc continue, code 6 
terminates an STR job, and code 8 
terminates a BSC job. (Code 6 must be used 
when the problem program is using STR 
devices and code 8 must be used when the 
problem program is using BSC support, to 
ensure that the lines are properly 
disabled.) If the operator enters any 
ether code, it is ignored. 

DUMP Macro 

i 1 1 — — 1 

| Name | Op | Operand I 



| | DUMP | | 
i j i i 

The DUMP macro instruction applies only to 
object programs that will be executed in a 
disk system. It should be issued when an 
unusual condition reguires that the job be 
terminated and that a print-out of 
registers and main storage be supplied to 
the user. It may also be issued on a 
normal end-of-job condition to cause a 
print-out. DUMP does not reguire an 
operand. In a BSC environment, the DUMP 
macro should be preceded by the ERRPT macro 
(see Binary Synchron ou s Co m munication ) . 

When DUMP is executed, the Supervisor 
causes a print-out to be taken, and then 
fetches and turns control over to the Job 
Control program. 

EOJ Macro 

i r i 1 

|Name | Op | Operand | 



| | EOJ | | 
i j i 1 

The EOJ (end-of-job) macro instruction 
should be issued at the end of a problem 
program to inform the system (and the 
operator) that the job is finished. EOJ 
does not reguire an operand. In a BSC 
environment, the EOJ macro should be 
preceded by the ERRPT macro (see Binary 
Synchronous Communication ) . 

When EOJ is executed in a disk system, 
the system loader (program-fetch routine) 
loads and transfers control to the Job 
Control program. If the disk system is not 
used for execution of the object program, 
however, control is turned over to the 
Supervisor and the system enters the wait 
state when the EOJ macro is executed. 
Then, if the program loader has not been 
overlaid, the operator presses the 
interruption and start keys to resume 
operation. This gives control to the 
program loader to load the next program for 
execution. 



SUPERVISOR- ASSEMBLY MACROS 

Whenever any program is executed, a 
Supervisor must be located in lower main 
storage to provide over-all control of 
operations. The Supervisor consists of 
routines to control the functions of 
machine interruptions, external 
interruptions, operator communication, and 
physical IOCS reguests and interruptions. 

Program Execu tion: In a Disk-Resident - 
System 

In a disk-resident system, one Supervisor 
contains the routines reguired to control 
the interruptions and all I/O devices in 
the installation. It is permanently stored 
on the system-residence disk pack, from 
which it is loaded into main storage for 
program executions. It can be loaded once 
at the beginning of the day to control the 
execution of all jobs run during the day. 
The jobs that may be executed include both 
the user's object programs and IBM-supplied 
programs, such as Assembler, Report Program 
Generator (RPG) , etc. 

This Supervisor also contains routines 
to load programs for execution, and to turn 
control over to those programs and/or 
receive control back from the programs that 
are executed. Thus the Supervisor in a 
disk system enables the user to stack jobs, 
so that one job after the other can be run 
without intervention from an operator. 

In addition to interruption routines, 
physical I/O routines, and loading 
routines, the Supervisor contains a 
transient area . This area starts on a 
double word boundary and provides a section 
of main storage to which certain standard 
but seldom-used routines may be transferred 
for execution. These transient routines 
are permanently stored on the 
system-residence disk pack, and they are 
loaded (by the Supervisor) into the 
transient area only when they are needed. 
This means that only one section of main 
storage must be reserved to accommodate a 
number of fairly large routines. Some of 
the routines using this area are: 

OPEN DUMP 
CLOSE Checkpoint 
End of Volume 

A Supervisor that will be used in a disk 
system is generally assembled once, at 
system-generation time when the 
installation is first established. It is 
stored on the system-residence pack at that 
time. Such a Supervisor is assembled to 
contain only the routines that are needed 
to control those I/O devices included in 
the user'-s configuration of the System/360. 
And, as previously stated, it contains 
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routines to control all the I/O devices in 
the installation. Therefore the Supervisor 
must be reassembled only if the system 
configuration changes by the addition or 
deletion of I/O devices or special 
features. Several macro instructions 
(SUPVR, SYMUN, IOCFG, and SEND) are used to 
assemble a Supervisor. These are discussed 
in the following pages under Macro 
Instructions to Assemble a Supervisor . 

Additional information about the 
functions of a Supervisor is given in the 
BOS Programmer' s Guide , as listed on the 
front cover of this publication. 

Pro g ram Execution; Not in a Disk-Resident 
System 

When a disk-resident system (with a system 
Supervisor) is not used for the execution 
of a user's object program, a Supervisor 
that contains all the routines reguired to 
handle the i ndividua l object program must 
be loaded into main storage ahead of the 
object program. This Supervisor must 
remain in main storage during the execution 
of the object program. If it contains the 
appropriate I/O routines for succeeding 
object programs, it can remain in main 
storage for. their execution also. 

Supervisors for object programs that are 
not executed in a disk-resident system must 
be assembled by the user either with his 
source program or separately. One or more 
Supervisors may be assembled and stored in 
card decks for use in an installation. The 
number of Supervisors that are assembled 
depends upon the input/output devices that 
are available in the installation and used 
in the various problem programs, and upon 
the available main-storage positions. The 
user can follow these procedures for. 
Supervisor assembly: 

• A Supervisor that contains all the I/O 
routines reguired to control all the 
I/O devices in the installation can be 
assembled once for an. installation. It 
is then used for the execution of any 
problem program, regardless of what 
units are utilized by the program. 
This Supervisor^ does not operate in a 
disk-resident system and will not 
contain any 2311 disk input/output 
routines. 

• Several Supervisors can be assembled 
such that each one controls particular 
groups of I/O devices. For example, 
one Supervisor may contain routines to 
handle magnetic- tape units, 2540 card 
reader, 2540 card punch, and 1403 
printer. Another Supervisor could be 
assembled to handle those devices plus 
the 1442 card reader and the 2671 paper 



tape reader. Then the appropriate 
Supervisor would be used with each 
problem program to control the I/O 
devices used by that program. 

• A Supervisor can be assembled to 

contain only those I/O routines that 
are reguired for the I/O devices used 
by a particular problem program. Such 
a tailored Supervisor can be assembled 
with the problem program, or it can be 
assembled separately. Separate 
assembly simplifies debugging and 
reassembly if errors are found in the 
problem program. In this case, only 
the problem program would need to be 
reassembled. 

Assembling a Supervisor separately from 
the problem program is possible because 
linkage between the problem program and the 
Supervisor is accomplished by Supervisor 
Calls or macros. There is no symbolic 
linkaqe between the two. 

Whenever a Supervisor and a problem 
program are assembled together, the problem 
program must not contain any symbolic names 
that start with I or SYS . 

A Supervisor that controls programs that 
are not executed in a diskvresident system 
does not contain a transient area. Instead 
routines, such as OPEN and CLOSE, are 
assembled with the user's object program. 

Additional information about the 
functions of a Supervisor is given in the 
Tape Programmer's Guide, as listed on the 
front cover of this publication. 

The same macro instructions that are 
used to assemble the Supervisor for a 
disk-resident system are used to assemble 
Supervisors for object programs that are 
not to be executed in a disk-resident 
system. However, only those macro 
parameters that apply to devices utilized 
by the problem program should be included. 



MACRO INSTRUCTIONS TO ASSEMBLE A SUPERVISOR 

Whenever a Supervisor is assembled (at 
system-generation time, with the problem 
program, or separately), the assembly 
reguires four basic macros: SUPVR 
(supervisor), SYMUN (symbolic units) , IOCFG 
(I/O configuration) , and SEND (supervisor 
end) . The IOCFG macro assembles error 
routines for the various devices in the 
system. 

The basic macro instructions must be 
issued in the order as listed and described 
in the following sections. 
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SUPVR Macro 



i 1 — 1 : : 1 

| Op | Operand | 

I 1- 1 

ISUPVR | DISK=YES, CONFG=nnnnnnnn,TR=YES, CR=YES, SAVEREG=YES | 
ISUPVR | CONFG=nnnnnnnn 1/ TR=YES ,CR=YES, CHKPT=YES | 



The SUPVR (Supervisor) macro instruction 
indicates that a Supervisor is to be 
assembled for operation in a particular 
model of the System/360. The system 
residence (if applicable) , machine size, 
and available special features are 
specified. 

Keyword parameters are specified in this 
macro. Therefore, the specifications may 
be entered in any order; those that do not 
apply may be omitted. Each keyword 
parameter except the last must be followed 
by a comma. 



DIS K=YES : This operand must be included 
when a Supervisor is to be assembled to 
operate in a disk-resident system. If the 
Supervisor will be used to control 
operations for the execution of object 
programs when a disk-resident system is not 
used, this operand must be omitted. If 
desired, however, DISK=NO may be used to 
achieve the same purpose. 

CONFG=nnnnnnnn ; This operand is the same 
as the configuration byte (byte 9) of the 
communication region. It must consist of 
eight "0" or "1" digits. The eight digits 
indicate the machine configuration for 
which the Supervisor is being assembled, as 
follows (numbering from the left) : 

Digit 

Po s itions Con f igura tion 

1-4 Number of bytes of main storage: 

8K=0000 
16K=0010 
24K=001 1 
32K=0100 
6UK=01 10 
128K=1000 
256K=1010 

5 Model * 

30=0 
other=1 

6 Floating-point option \ Present=1 

7 Decimal feature / 

I Not 

8 Printer=Keyboard j present=0 

* When Model 30 is specified, 12 bytes are 
reserved for a diagnostic scan-out area. 



For any other model, 256 bytes are 
reserved. 

If this keyword field is omitted, it is 
assumed to be CONFG=00000000. This is 
interpreted as an 8K Model 30 without the 
floating point option, the decimal feature, 
and the printer- keyboard . 

If a Supervisor will ever be used in a 
system with main storage greater than 32K, 
CONFG must specify 64K (0110) or greater. 
This is necessary because additional coding • 
is reguired in the Supervisor for 
configurations greater than 32K. If the 
assembled Supervisor is subseguently used 
for a configuration of 32K or less, a Job 
Control CONFG card must specify the machine 
size for program execution. 

TR=YES : This operand (timer routine) must 
be included if the supervisor being 
assembled is to be used for any problem 
program that contains a routine (s) for the 
interval timer. If this pperand is 
omitted, the interval timer (INTTMR) switch 
must be set OFF for any program (s) that 
uses this Supervisor. 

CR=YES : This operand (communication 
routine) must be included if the Supervisor 
being assembled is to be used for any 
problem program that contains a routine (s) 
for operator-initiated communication from 
the 1052. 

CHKPT=YES : This operand (checkpoint) must 
be included if the Supervisor being 
assembled is to be used for any problem 
program that includes the checkpoint macro 
or that reguires restarting from 
checkpointed records. This operand applies 
to the assembly of a Supervisor only if a 
disk-resident system will not be used for 
the execution of programs that utilize this 
Supervisor. From the parameters in this 
instruction, the initial values for the 
Supervisor communication region are 
assembled. 

SAVEREG=YE5 : This operand is optional, but 
must be included if the user plans to use 
registers 12 and 13 for programs that are 
executed in a disk-resident system. It 
directs the supervisor and physical IOCS to 
save and restore these registers. If the 
operand is omitted, the programmer must not 
use registers 12 and 13 because these 
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registers are used by the Supervisor 
Interruption Routine, and interruptions are 
unpredictable. If the supervisor is to be 
used to control operations for the 
execution of object programs when a 
disk-resident system is not used, this 
operand must be omitted. 

N ote : If Autotest is used, the 
programmer must not use registers 12 and 13 
because these registers are used by the 
Autotest Master Control routine. 

SYMUN Macro 

i 1 1 

|0p | Operand | 

I 1 1 

ISYMUN | rijX'ccuu'jX'ddss'/X'ccuu'fX'ddss* j 
i i i 

Each file of input or output data is 
associated with an input or output device 
that is represented in a problem program by 
a s ymbolic uni t. The symbolic unit is used 
instead of a device address (channel and 
unit) . Then when the program is executed, 
the file of records (disk pack, tape reel, 
card deck, etc) is placed in an actual 
device and that device is assigned to the 
symbolic unit. Thus,, the actual device 
(which disk or tape drive, for example) 
need not be determined until the job is 
run. All devices are handled in this 
manner, and a specified set of symbolic 
units can be used: 

SYSRDR - system control-card reader 
SYSLST - system printer 
SYSIPT - main system input device 
SYSOPT - main system output device 
SYSLOG - control card logging device 
SYS000-SYS254 - other devices in the 
system 

In the last group (SYS000-SYS254) the 
user assigns numbers, in order, for all the 
devices reguired in his problem program. 

To relate the actual device (channel and 
unit address) to the symbolic unit, a 
device table is maintained in the 
Supervisor. The number of entries needed 
in the table must be determined by the 
programmer when the Supervisor is 
assembled. The first five (SYSRDR, SYSLST, 
SYSIPT, SYSOPT, and SYSLOG) are assumed to 
be present, and he must specify only the 
additional number. That is, he specifies 
how many numbered units, starting with 
SYS000, are used. This must be the first 
operand (n) in the SYMUN macro instruction. 
If no units above the basic five are 
required, n is specified as "0". 

When a supervisor is assembled with a 
large number of options (in SUPVR and IOCFG 
macros) , the number of devices that can be 



specified (SYMDN macro) may be limited. 
The absolute maximum value for n is 255. 
However, the maximum value of n for a 
supervisor generated specifying a large 
number of options depends upon the options 
specified, and may be less than 255. 

The assignment of an actual device to a 
symbolic unit can be made by the Job 
Control ASSGN card, or it can be made at 
the time the Supervisor is assembled by 
this SYMUN macro. Any, all (up to" 24) , or 
none of the symbolic units may be assigned 
actual devices at assembly time. When the 
assignment is made by this macro, the 
device remains assigned to the symbolic 
unit unless the assignment is overridden by 
a Job Control ASSGN card. Therefore, if no 
change in assignment is required for the 
execution of a program, Job Control 
assignment can be bypassed when the object 
program is loaded. 

Any of the first 24 devices 
(SYSRDR-SYS018) to be used during program 
execution may be assigned by the SYMUN 
macro instruction. Any others must be 
assigned by Job Control. 

When devices are assigned by the SYMUN 
macro, the operand should be in the 
positional format. A separate pair of 
parameters (X 1 ccuu • , X' ddss 1 ) is entered for 
each device in this exact order: 

SYSRDR, SYSLST, SYSIPT, SYSOPT, SYSLOG, 
SYS000, SYS001, ,SYS018 

That is, the first pair of parameters 
(after n) assigns a card reader to be used 
as the system reader for control cards, the 
second pair assigns a printer for system 
listings, the seventh pair assigns a device 
to unit SYS001, etc. When any symbolic 
unit is not to be assigned a device at this 
time, two commas must be entered to 
indicate the omission if other assignments 
follow. If no more devices are to be 
assigned, however, the commas are also 
omitted. 

The parameters (X' ccuu' , X' ddss' ) for 
each assigned device are two 4-position 
hexadecimal numbers indicating the channel 
(cc) and unit (uu) address, the device type 
(dd) , and specifications (ss) , as follows: 

cc - channel number 

00 - multiplexor channel 

01 - 1st selector channel 

02 - 2nd selector channel 

uu - 00-FF- unit address (0-255) 

dd - device type 

00 - 2401, 2402, 2403, 2404 

magnetic tape unit 
02 - 1052 printer-keyboard 
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04 
06 
08 
OA 

OC 
10 
12 
14 
16 



18 - 



1A - 



1C - 



1E - 



20 - 



1412 card read-punch 
1403, 1404 printer 
2540 card read 
2540 card punch or punch 

feed read 
2311 disk storage drive 
2671 paper tape reader 
1443, 1445 printer 
2501 card reader 
2520 card read-punch (reading, 

or reading and punching for 

combined files) 
1285 optical reader or 1287 

optical reader operated in 

journal tape lode 
2520 card punch or 2520 card 

read-punch (punching only) 
2701 data adapter unit 

with SDA I (STR) 

data adapter unit 
1287 optical reader operated 

in document mode 
2701 data adapter unit 

with SDA II (BSC) 



ss - specifications 

These two hexadecimal characters 
are 00 unless 7- or 9-track tape 
is specified. With 7-track tape 
they provide 4 different options: 
Density, Parity, Translate, and 
Convert. A code is specified to 
represent a valid combination of 
options (Figure 48) . For 9-track 
tape, codes are: C8 to indicate 
800 bytes/inch; CO to indicate 
1600 bytes/inch. If this operand 
is Omitted, a density of 800 BPI 
is assumed. This device 
specifications byte is also used 
internally as a gueue pointer for 
the channel scheduler. Users 
should not utilize this byte for 
any purpose other than magnetic 
tape specifications. 

From the parameters in this instruction, 
the macro sets up the physical-device table 
that is used by the I/O reguest and 
interruption routines. 
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The IOCFG (I/O configuration) macro 
instruction defines the input /output units 
and channels that the Supervisor must 
service. When a Supervisor is assembled 
for a disk-resident system, this macro must 
include all the types of devices ajid 
features (as indicated in the following 
list of parameters) that are available in 
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Figure 48. Options for 7-Track Tape 

the user's installation. However, when a 
Supervisor is assembled for an object 
program (s) that is not to be executed in a 
disk-resident system, only those devices 
and features that will be needed by the 
object program (s) should be specified. 
Thus, if the object program uses tape 
units, a 2540 reader, and a 1403 printer, 
the parameters that relate to these units 
should be included, and all others should 
be omitted. The available channel (s) and 
certain tape-unit specifications are also 
included, as indicated in the following 
list of parameters. 

Keyword parameters are specified in this 
instruction. Therefore the specifications 
may be entered in any order, and those that 
do not apply may be omitted. Each keyword 
parameter except the last must be followed 
by a comma. 

The parameters that are used to specify 
required devices are: 

Parameter Object Pro g ram (s) Reguires 

MPX=n Multiplexor channel. n = 1-255 

to specify the number of gueues 
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desired for the multiplexor 
channel. (If omitted, n=1 is 
assumed. ) 



One selector channel (n is "1") 
or both selector channels (n is 
"2") 

Two-channel read-while-write 
Tape Control Unit 

In general DVE should be 
specified if problem programs 
may contain command control 
blocks with the Wait for Device 
End bit on. Such CCB's are 
generated by IOCS: 

1. for control commands, 

2. if CRDERR=RETRY is 
specified for 2540 or 2520 
punches, 

3. if PRINTOV=YES is specified 
for printers. 

n = maximum number of devices 
to be tested for Device End. 

A carriage tape should not have 
the channel 9 punch under these 
two conditions: 

1. Supervisor used for the 
problem program does not 
include the DVE 
specification. 

2. Supervisor does include the 
DVE specification, but the 
PRTOV or CCB macro 
instruction in the problem 
program does not reguest 
posting of device end in 
the command control block 
(CCB) . 

If a 9 punch is used under 
either condition, a physical 
IOCS error message will result. 

2401, 2402, 2403, or 2404 
Magnetic Tape Unit 

2540 reader 

2540 punch feed read 

1442 read, or read and punch 
for combined files 
2501 reader 

2520 read, or read and punch 
for combined files 

2540 punch only 

1442 punch only 



P3= YES 


Zdzu puncn only 


L 1 — I lib 


1/tAO sit* 1/1 fill D t n4- nr 

i»4Ud or itut printer 


L,/i— lib 


1/1/1? nr 1/1/1^ Drinf or 


C1=YES 


1052 Printer-Keyboard 


R0=YES 


2671 Paper Tape Reader 




Optical Reader 


BACKWRD=YES 


Backwards reading of magnetic 
tape 


TRK7=YES 


7-track magnetic tape 


TRK9=YES 


9-track magnetic tape. (If 



omitted and T=YES is specified, 
TRK9=YES is assumed.) 

ST=YES 2701 Data Adapter Unit with SDA 

I (STR) 

ANSWR=n Used to specify the maximum 

number (n=1-6) of STR devices 
to be monitored for ringing 
when using the STR SOPEN 
(DIAL=IN) macro. If more lines 
are specified to be monitored 
in the problem program than 
were specified in n of ANSWR, 
an error message is issued and 
the job is terminated. 

BSC=YES 2701 Data Adapter Unit with SDA 

II (BSC) 

BTAB=n Specifies the maximum number 

(n=1-12) of BSC CCB»s used in 
any single BSC program. If 
BSC=YES is coded and BTAB is 
omitted, BTAB=1 is assumed. 

From the parameters in this IOCFG 
instruction, the macro assembles the 
channel scheduler and I/O interruption 
routines for the Supervisor, and selects 
the appropriate device error routines. 

SE ND Macro 
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The SEND (supervisor end) macro instruction 
must be included as the last instruction in 
the set reguired to assemble the 
Supervisor. It contains o ne, two or three 
operands. 

The first operand is optional, and it 
specifies the number (n) of bytes to be 
reserved as a patch area at the end of the 
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Supervisor in main storage . This area can 
be used for changes or corrections in the 
Supervisor itself. With this area the 
Supervisor can be enlarged, if necessary, 
without reguiring the reassembly of 
programs that utilize main storage 
immediately above the Supervisor. The 
minimum size of this area should be 150 
bytes for IBM-supplied changes to the 
Supervisor. The user may also reserve 
additional room for expansion of the 
Supervisor due to changes in his system 
configuration or for the inclusion of 
additional supervisor functions. If this 
operand is not included but the second 
operand is reguired, a comma must be 
entered to indicate the omission. 

Whenever a Supervisor that is not to be 
used in a disk-resident system is 
assembled, a Program Loader also is 
assembled. It follows the Supervisor and 
is considered part of the Supervisor in 
main storage. In this case, the patch area 
is located in main storage between the 
Supervisor and Program Loader. 

The s econd operan d (REP) also is 
optional and applies only to the assembly 
of a Supervisor and Program Loader that are 
not tp be used in a disk-resident system. 
It causes the Program Loader that is 
assembled with the Supervisor to include a 
replace-text function (see Tape 
Programmer's Guide as listed on the front 
cover of this publication) . The ability to 
process REP cards in the Program Loader can 
only be achieved by specifying this 
operand. 

The t hird operand is also optional and 
applies only to the assembly of a 
supervisor to be used in a disk^resident 
system. This operand specifies the user's 
desired supervisor end address, and may be 
either in decimal or in hexadecimal. It 
must specify a double word boundary; if 
this is not done, alignment will be to the 
next highest double word. Enough room must 
be allowed for the supervisor being 
assembled or the supervisor could be 
destroyed by the transient routines. (See 
the supervisor core size chart or the 
Programmer's Guide publication.) 



Whenever the third operand is used an 
MNOTE will be issued at assembly time to 
warn the user. Then the user has to check 
that enough room has been reserved. 



Once a SEND address is specified for a 
given set of parameters, it will never have 
to be changed, thus eliminating the 
necessity of relinkage editing the entire 
system for maintenance purposes when the 
supervisor changes. 

The specified SEND address overrides the 
optional patch area, as specified by the 
first operand of the SEND macro. It also 
overrides the built-in supervisor patch 
area which is reserved along with several 
options in the SUPVR and IOCFG macros. 



ORGANIZATION TO ASSEMBLE A SUPERVISOR 

The set of instructions in Figure 49 
illustrates the reguirements for assembling 
a Supervisor for the control of problem 
program execution and a Program Loader for 
loading problem programs. The example 
assumes the setup described in the 
following eight items: 

1. Job control cards are used to prepare 
for the assembly. These job control 
cards are input to the Job Control 
program on the system tape. The 
assembled object deck is to be punched 
in a 2540 with the address of channel 
0, unit 04. A DATE control card also 
is reguired if this assembly is the 
first job after performing an IPL. 

2. An IPL (Initial Program Loading) loader 
is to be assembled with a Supervisor 
that is assembled for the execution of 
object programs when a disk-resident 
system is not used. The loader will be 
used at program execution time to load 
the Supervisor and Program Loader from 
a card reader. (If a Supervisor were 
to be assembled for a disk-resident 
system, the AOPTN IPL control card 
would be omitted.) 
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Note: Circled numbers refer to items in the text. 



Figure 49. Assembling a Supervisor and Program Loader 



3. A Supervisor is to be assembled. (If a 
Supervisor were to be assembled for a 
disk-resident system, DISK=YES would be 
specified. ) 



U. The problem program will require three 
I/O units over and above the basic five 
(SYSRDR, SYSLST, SYSIPT, SYSOPT, and 
SYSLCG) . 

Control cards for the execution of 
the problem program will be read by the 
system reader which is a 2540 reader 
addressed as channel 0, unit 08. 

A 1403 printer addressed as channel 
0, unit 10, is assigned as the system 
printer. 

The main system input device is the 
same device as the system reader, which 
is addressed as channel 0, unit 08. 

The main system output device is a 
2540 card punch addressed as channel 0, 
unit 04, 



Control cards will be logged on a 
1052 printer-keyboard addressed as 
channel 0, unit 1F. 



Two tape drives will be reguired by 
the object program. They will be 
assigned to symbolic units SYS000 and 
SYS001 when the program is executed. 
Job Control ASSGN cards, rather than 
the SYMUN macro, will make these 
assignments. 

The program also uses the 1052 
printer-keyboard addressed as channel 
0, unit 1F, and referred to as symbolic 
unit SYS002. 

5 The features and types of I/O devices 
that will be reguired by the object 
program are: 

The multiplexor channel and one 
selector channel 

Magnetic tape units, with nine-track 
tape, on the selector channel 
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2540 card reader 

2540 card punch 

1403 printer 

1052 printer-keyboard 

6. This is the end of the 

Supervisor- Assembly macro instructions. 
An area of 200 bytes is to be reserved 
at the end of the Supervisor. 

This Supervisor is to be assembled 
for use in conjunction with the 
execution of object programs when a 
disk-resident system is not used. The 
Program Loader is assembled immediately 
after the Supervisor and the 
replace-text function is assembled as 
part of the Program Loader so that REP 
cards can be used when problem programs 
are loaded for execution. (If a 
Supervisor were to be assembled for a 
disk-resident system, as indicated by 
the SUPVR macro instruction. Program 
Loader would not be assembled and REP 
is omitted.) 

7. The user's problem program is assembled 
next. This applies only to the 
combined assembly of a Supervisor and a 
problem program, when a disk-resident 
system is not to be used for the 
execution of the object program. 

8. If the Supervisor and Program Loader 
are not assembled with the problem 
program, or if a Supervisor is 
assembled for a disk-resident system, 
the END card comes immediately after 
the SEND card. 



JOB-CONTROL- ASSE MBLY MACROS (NCT FOR A 
DISK-RESIDENT SYSTEM) 

Hhen a user's problem program is to be 
executed, it may reguire the setup 
functions provided by a program called the 
Job-Control program. A Job-Control program 
is available on the system pack for problem 
programs that are to be executed in a 
disk-resident system. However, if a 
problem program is to be executed when a 
disk-resident system is not used, a 
Job-Control program must be made available. 
In this case, the Job Control program must 
be assembled by the user from IBM-supplied 
macro routines. Once the Job-Control 
program has been assembled, it can be 
executed any time its functions are 
required for a problem program. (This 
Job-Control program is separate from and 
has no relation to the Job-Ccntrol program 
that resides on the system pack.) For 
additional information about Job-Control 
programs, see the Programmer's Guides as 



listed on the front cover of this 
publication. 

A Job-Control program has two main 
functions: preparing jobs to be run, and 
restarting the execution of a job at some 
point other than the beginning. The 
program consists of two phases, which are 
obtained by two assemblies, the first using 
the JBCTL macro and the second, the RSTRT 
macro. 

The phase assembled by the JBCTL macro 
prepares jobs to be executed. It contains 
routines to: 

1 . Indicate the name of the job to be 
executed next. 

2. Assign actual input/output devices 
(addresses) to the symbolic units 
(SYSRDR, SYSLST, etc.) used by the 
problem program". 

3. Place today's date in the 
communication region of the 
Supervisor. This can be used by 
problem programs. 

4. Set (ON or OFF) the 
user-program-switch indicators {UPSI 
byte) in the communication region of 
the Supervisor. 

5. Reset the program check indicator to 
ABORT. 

6. Edit and store label information for 
later use by the tape label routines. 

7. Store machine configuration in 
communication region of the 
Supervisor. 

8. Allow restarting of previously 
checkpointed records. 

9. Print (log) job control cards. 

10. Assign I/O reguest gueues to multiplex 
mode devices on the multiplexor 
channel. 

11. Initiate execution of of the next job. 

12. Allow the wait state to be entered 
before the job is executed, so that 
the operator can perform any 
preparatory operations. 

The user can communicate with this program 
using job-control cards such as JOB, ASSGN, 
and EXEC. 

The phase obtained from the RSTRT macro 
contains routines for continuing the 
execution of an interrupted job at a point 
other than the beginning; The checkpoint 
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(CHKPT) macro must be used in the problem 
program to provide input information about 
the status of the job so that the restart 
phase of the Job-Ccntrol program can 
continue execution, if necessary. 

To restart a job, both phases of Job 
Control must be used. The job-control 
cards reguired for restarting a 
checkpointed job are described in the Tape 
Programmer's Guide, as listed on the front 
cover of this manual. 

These two phases of the Job-Ccntrol 
program must be assembled separately. The 
operand field of each macro instruction 
must be blank. 

JBCTL Macro 
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ASSEMBLING THE JOB CONTROL PROGRAM 

To obtain both phases of the Job-Control 
program, two assemblies are reguired. The 



job-control cards for the system tape 
Job-Control program (see section 1 of 
Figure 20) must be used at the beginning of 
each assembly. Three other cards must 
follow the job-control EXEC -card. To 
assemble the first phase of the Job-Control 
program, these three cards are: 



r — r 

jOp | Operand 
i i 


i 


| START | 4096 - Assembler Start Card | 

| JBCTL | - Macro Instruction | 

| END | START - Assembler End Card | 
■ i i 


To assemble the restart phase of the 
Job-Control program, these three cards are 




i 1 - ■■ - ■' ■■■ ■■■ — 

| Op | Operand 

I 1 


i 
1 

-\ 


| START| 4096 - Assembler Start Card 
| RSTRT | - Macro Instruction 
| END | SYSRST - Assembler End Card 
i ■ 


1 

1 

1 
i 


The START cards in these examples give 



an absolute machine address (4096) , which 
is the address at which the user wishes to 
begin loading the Job-Control program. In 
general, the user can either specify an 
absolute loading address, or he can omit 
the address operand and use the Tape 
Linkaqe Editor to provide a job-control (or 
restart) card deck with the proper loading 
addresses. 
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CONTROL CARDS 



The Assembler program operates under 
control of the Supervisor program, which 
resides on the systems pack. Certain 
job-control cards are therefore needed by 
the Job Control program to identify and 
initialize each Assembler run, or assembly. 
Four Assembler files (or five, if two 
workfiles are utilized) are reguired for an 
Assembler run. These files and their 
permissible device assignments are as 
follows: 

1. Workfile 1 (disk) 

2. If used, Workfile 2 (disk) 

3. Source input (card reader or tape) 

4. Text output (card punch,. tape, or 
relocatable library) 

5. Listing output (printer or tape) 

Device assignments for these files are 
normally given at systems generation time. 
If, however, these assignments were not 
given at that time or the user wishes to 
alter any of the assignments, certain 
job-control cards may be used at assembly 
time to make the desired assignments. The 
types of job-control cards and their 
functions are described in Appendix I and 
the Prog rammer's Guide for Basic Operating 
System. 

As shown in the preceding list, three of 
the Assembler files (source input, text 
output, and listing output) may be assigned 
to tape units. They each may be assigned 
to a separate unit or one of the following 
two combinations may be assigned to the 
same unit: 

1. source input and text output 

2. source input and listing output. 

Either 7- or 9-track tape may be used for 
these assignments, (see Figure 55 for 
7-track tape reguirements) . Special 
messages produced by an ALOG card are not 
considered to be an Assembler file. They 
are listed on the printing device that is 
assigned to SYSLOG. 

Certain control cards may be supplied 
for use by the Assembler program. These 
cards indicate which of the Assembler 
processing options the Assembler program is 



to perform or provide. The Assembler 
control cards are: AOPTN (Assembler 
option) card, ALOG (Assembler log) card, 
AWORK (Assembler workfile) card, and AFILE 
(system file) card. These cards have the 
same format as Assembler-language 
instructions. The AOPTN, ALOG, AWORK, and 
AFILE appear as if they were mnemonic 
operation codes, and the various options 
are specified as operand (s). 

AOP TN (Assembler Option) C ard 

AOPTN card(s) are reguired only if the user 
wishes to alter the normal output from the 
Assembler. 

The normal Assembler output consists of 
two major files: the object program and 
the program listing. The object program 
consists of three types of information: 
the external symbol dictionary (ESD) , text, 
and the relocation dictionary (RLD). The 
program listing consists of five lists of 
information : ESD listing, source and 
object program listing, RLD listing, error 
listing, symbol table, or cross reference 
listing. 

The option (s) that may be supplied in 
the AOPTN cards are shown in Figure 50; 
each option is identified by a symbol which 
is used in the AOPTN card. Each option of 
the AOPTN card may be specified in a 
different AOPTN card, or the options may 
appear as multiple operands (separated by 
commas) in a single card. 

If the user wishes to include the 
options BGNBATCH (begin batch processing) , 
BATCH, and ENDBATCH, the AOPTN BGNBATCH 
card should be included only in the first 
assembly, and AOPTN BATCH in each 
succeeding assembly except the last. In 
the last assembly, the AOPTN ENDBATCH card 
should be included to discontinue the batch 
processing environment. Job control cards 
should precede only the first assembly 
(Figure 51). 

ALOG ( Assembler Log) Card 

The contents of the ALOG card, all 
assembler-option (AOPTN) cards, all 
assembler workfile (AWORK) cards, and all 
assembler system file (AFILE) cards 
following the ALOG card are printed out on 
SYSLOG. A statement of the total number of 
errors also is printed out on SYSLOG. 
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1 — — I 

| OPTION | 


— — i 

MEANING | 


| NODECK | 


_ ., 

The object deck will not be produced in cards, tape, or disk. (This does | 
not affect the appearance of the program listing) . Also, no cards will be | 
produced as a result of REPRO or PUNCH instructions. | 


| NOESD | 

{ ! 


No ESD data will appear in the object program or the program listing. | 
(Program will not be acceptable to a Basic Operating System or Operating j 
System) . j 


| NORLD | 

{ ', 


No RLD data will appear in the object program or the program listing. | 
(Program will not be relocatable) . | 


| NOLTST | 


The program listing will not appear. I 


| NO ERR | 


The error listing will not appear in the program listing. j 


| NOSYM | 


The symbol table will not appear in the program listing. j 


| PCHSYM | 


The symbol table will be punched out (depending on the device) on the same | 
device as specified for text output. This table is in the format reguired | 
for the Autctest program. | 


| CROSSREF | 
j j 


A cross-reference listing will appear instead of the symbol table listing, j 
The cross-reference listing contains up to a total of 20, 625 statement | 
number references to symbols used. If more than 20,625 references are j 
used, symbols and references above that number will not be shown. | 


1 IPL | 


An IPL routine (for loading an independent Supervisor from a card reader) | 
will precede the object program. | 


( ENTRY | 


An ENTRY card will be produced at the end of the output text. | 


| BGNBATCH | 

! i 


If SYSLST and SYSOPT are assigned to a tape unit, the tapes will be opened, | 
initiating a batched environment. The listing and output tapes will not be | 
closed at the end of assembly. I 


| BATCH | 


A batched environment will be initiated or continued. Listing and output j 
tapes will not be closed. | 


| ENDBATCH | 
I ... ... X. 


If SYSLST and SYSOPT are assigned to tape, the tapes will be closed. The | 

batched environment will be discontinued and end-of-job will be called. | 

j 



Figure 50. AOPTN Card Option Indicators 



AWOR K (Assembler Workarea) Card 

An A WORK card indicates the number of 
workareas the Assembler is to use in 
processing source- program statements. The 
Assembler can use either one or two 
workareas. Normally two workareas are 
provided qnly if two disk drives are 
available. In this case, one workarea can 
be assigned to each disk drive. Using two 
workareas on separate disk drives shortens 
the processing time reguired by the 
Assembler. 

The A WORK card reguires cne operand. If 
the digit 1 appears as the operand, the 
Assembler assumes one workarea. If the 
digit 2 is used, the Assembler assumes two 
workareas. If no AWORK card is provided, 
the Assembler assumes one workarea. 



A workarea must always be assigned to a 
continuous disk area between specified 
limits (XTENT) on one disk pack. This is 
accomplished by using the proper 
job-control cards. 



AFILE (Assembler Fi le) Card 

An AFILE card directs the Assembler to 
place the entire output deck (see Figure 
57) in the relocatable library as a module. 
The format of the AFILE Assembler control 
card is: 
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IName 


|0p 


_j 1 

| Operand | 


1 Name 


| AFILE 


-+ 1 

| LIBRARY, RETAIN | 
1 or | 
| LIERARY | 

J_ | 



A name must be given in the name field. 
The name given may include one to six 
characters. Any additional characters are 
ignored. (The name ALL is not allowed.) 
The name is placed in the relocatable 
library directory to identify the module. 

The first operand is LIBRARY and must 
always appear in the AFILE card. If RETAIN 
appears as the second operand in the AFILE 
card, the module is entered permanently and 
remains until it is deleted or replaced. 



Note: 



If any of the other 
assembler options 
are used, the cards 
can be placed any - 
where in this deck 
between the EXEC 
card and the appropriate 
source deck. 



SOURCE DECK 
LAST ASSEMBLY 



AOPTN ENDBATCH 



SOURCE DECK 
ASSEMBLY 2 



AOPTN BATCH 



SOURCE DECK 
ASSEMBLY 1 



AOPTN BGNBATCH 



// EXEC 



1 



// DATE 



// JOB ASSEMBLER 



operand is omitted, the module is entered 
temporarily and will be overlaid by the 
next module entered into the relocatable 
library. 



Based upon the intended usage of the 
module, the user must provide a PHASE 
and/or an ENTRY card in the module. The 
initial PHASE card can be obtained with a 
PUNCH or REPRO statement placed before the 
(actual or implied) START statement. An 
ENTRY card can be obtained with an AOPTN 
ENTRY card. A description of the 
alternatives available for processing 
modules in the relocatable library may be 
found in the section Linkage Editor in the 
BOS Programmer's Guide as listed on the 
front cover of this publication. 



It is possible to load and execute an 
object program immediately after the 
assembly is completed. This may be 
accomplished by entering the name of the 
first phase to be executed as the second 
operand of the JOB card used for the 
Assembler run. The module, created for this 
purpose must be terminated by an ENTRY card 
and must contain one or more PHASE cards. 
This procedure for processing a module 
immediately after it is assembled and 
placed in the relocatable library has no 
effect on the future availability of the 
module. It remains in the relocatable 
library and may be accessed normally until 
deleted or (in the case of a temporary 
module) the next module is entered. 



Note ; Multiple phases are created in a 
single assembly by using an XFR card to end 
a phase. A PHASE card, created by a REPRO 
or PUNCH statement, follows this XFR card 
and precedes the next phase in line. To 
ensure proper execution, each phase created 
in this manner should be a separate control 
section. 



Figure 51. Batch Processing If the second 
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A S S EMBLER LANGUAGE S UBSET RELATIONSHIP 



There are three separate System/360 
assembler languages. One is for Basic 
Programming Support (Card) and is called 
the basic assembler language. The second 
is for Basic Programming Support and Basic 
Operating System and is called the tape and 
disk assembler language. The third is the 
Operating System assembler language. The 
basic assembler language is a subset, of the 
tape and disk assembler language, which in 
turn is a subset of the Operating System 



assembler language. Any language features 
that exist on one level exist on all higher 
levels, with the exception of the XFR 
assembler instruction. (The XFR assembler 
instruction is unigue to the tape and disk 
assembler language.) 

The differences between the Operating 
System assembler language and the Basic 
Operating System disk assembler language 
are shown in Figure 52. 
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LANGUAGE 
FEATURE 


BASIC OPERATING SYSTEM 
SPECIFICATION 


OPERATING SYSTEM 
SPECIFICATION 


CODING CONVENTIONS 


Continuation Lines 


Maximum of one continuation 
line allowed 


Maximum of two continuation 
lines allowed 


CONSTANTS 


Address Constants 


Only one address constant may 
be specified in a DC statement or 
a literal 


One or more address constants may 
be specified in a DC statement or 
a literal 


Bit-Length Spec- 
ification 


Feature excluded 


Feature is provided in Oper- 
ating System 


DC Operands 


Only one operand allowed per 
DC statement 


One or more operands allowed 
per DC statement 


Duplication Fac- 
tor 


Duplication factor expressable 
only by a decimal self-defining 
term 


Duplication factor expressable 
by any absolute expression 


Exponent Modifier 


Exponent modifier expressable only 
by a decimal self-defining term 


Exponent modifier expressable 
by any absolute expression 


Length Modifier 


Length modifier expressable only 
by a decimal self-defining term 


Length modifier expressable by 
any absolute expression 


Literals 


In case of duplicate literals, 
more than one may be stored 


In case of duplicate literals, 
only one is stored 


Scale Modifier 


Scale modifier expressable only 
by a decimal self-defining term 


Scale modifier expressable by 
any absolute expression 


EXPRESSIONS 


Parentheses 


Only one set of parentheses ( ) 
allowed'in an expression 


No limit on the number of sets 
of parentheses ( ) allowed 
in an expression 


Terms 


Maximum of three terms allowed 
per expression 


No limit on the number of terms 
allowed per expression 


STORAGE DEFINITION (DS STATEMENT) 


DS Operand 


Only one operand allowed in a 
DS statement 


One or more operands allowed 
in a DS statement 


Length Modifier 


Maximum length designation of a 
storage field is 256 bytes 


Maximum length designation of 
a storage field is 65,536 bytes 


ASSEMBLER-INSTRUCTION STATEMENTS 


CNOP 


Each operand expressable only by 
a decimal self-defining term 


Each operand expressable by 
any absolute expression 


COM 


Statement excluded 


Statement provided in Oper- 
ating System 


COPY 


Statement excluded 


Statement provided in Oper- 
ating System 


CSECT and 
DSECT 


In addition to the combined number 
of CSECTs, DSECTs, EXTRNs, and 
V-type address constants not being 
allowed to exceed 255, the combined 
number of CSECT and DSECT state- 
ments must not exceed 32. 


The combined number of CSECT 
statements, DSECT statements, 
EXTRN statements, and V-type 
address constants must not exceed 
255 


EXTRN and 
ENTRY 


Only one relocatable symbol is allow- 
ed in each EXTRN and ENTRY state- 
ment 


One or more relocatable sym- 
bols are allowed in each . 
EXTRN and ENTRY statement 


TITLE 


The first TITLE statement provides 
the heading only for pages of the 
listing that follow it, until the 
next TITLE statement (if any) is 
encountered 


The first TITLE statement, in 
addition to providing the head- 
ing for all pages of the list- 
ing that lie between it and the 
next TITLE statement (if any), 
also provides the heading for 
any page(s) of the listing 
that precede it. 


USING and 
DROP 


Maximum of 5 base register desig- 
nations allowed in each USING or 
DROP statement 


Maximum of 15 base register 
designations allowed in each 
USING or DROP statement 


XFR 


Statement provided In Basic 
Operating System 


Statement excluded 



Figure 52. Differences Between Basic Operating System and operating System 
Assembler Languages 
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APPENDIX A; CHARACTER CODES^-PART 1 



This appendix lists all System/360 card « 
See Part 2 for a complete list of character 



Card Printer Internal 

Cade Gr aph ics Representation 

blank 01000000 

12.8.3 . (period) 01001011 

12.8.4 < 01001100 

12.8.5 ( 01001101 

12.8.6 + 01001110 
12 5 01010000 

11.8.3 $ 01011011 

11.8.4 * 01011100 

11.8.5 ) 01011101 
11 - 01100000 
0,1 / 01100001 
0,8,3 , 01101011 
0,8,4 % 01101100 

8.3 # 01111011 

8.4 S 01111100 

8.5 • (prime) 01111101 

8.6 = 01111110 

12.1 A 11000001 

12.2 B 11000010 

12.3 C 11000011 

12.4 D 11000100 

12.5 E 110Q0101 

12.6 F 11000110 

12.7 G 11000111 

12.8 H 110010Q0 

12.9 I 11001001 



odes to which a printer graphic is assiqned. 
codes. 

Card Printer Internal 

Code Graphics Represent a tion 



11,1 


J 


1 1010001 


11,2 


K 


1 1010010 


11,3 


L 


1 101001 1 


11,4 


M 


1 1010100 


11,5 


N 


1 1010101 


11,6 


0 


1 10101 10 


11,7 


P 


1 10101 11 


11,8 


Q 


1101 1000 


11,9 


R 


11011001 


0,2 


S 


11100010 


0,3 


T 


1 1100011 


0,4 


0 


1 1100100 


0,5 


V 


1 1100101 


0,6 


w 


1 11001 10 


0,7 


X 


1 11001 11 


0,8 


Y 


1 1101000 


0,9 


Z 


1 1101001 


0 


0 


1 11 10000 


1 


1 


1 11 10001 


2 


2 


1 11 10010 


3 


3 


1 11 1001 1 


4 


4 


1 11 10100 


5 


5 


11110101 


6 


6 


11110110 


7 


7 


11110111 


8 


8 


1 11 1 1000 


9 


9 


111 11001 
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APPENDIX A: CHARACTER . CODES — PAR T 2 



8-BIT 


CHARACTER SET 








BCD 


PUNCH 


PRINTER 






CODE 


COMBINATION 


GRAPHICS 


DECIMAL 


HEXADEC: 


00000000 


12,0,9,8, 1 




0 


00 


00000001 


12,9,1 




1 


01 


00000010 


12,9,2 




2 


02 


0000001 1 


12,9,3 




3 


03 


00000100 


12,9,4 




4 


04 


00000101 


12,9,5 




5 


05 


00000 110 


12,9,6 




6 


06 


0000011 1 


12,9,7 




7 


07 


00001000 


12,9,8 




8 


08 


00001001 


12,9,8, 1 




9 


09 


00001010 


12,9,8,2 




10 


OA 


0000101 1 


12,9,8,3 




11 


OB 


00001 100 


12,9,8,4 




12 


OC 


00001 101 


12,9,8,5 




13 


OD 


00001 110 


12,9,8,6 




14 


OE 


00001111 


12,9,8,7 




15 


Of 


00010000 


12,11,9,8,1 




16 


10 


00010001 


1 1/9, 1 




17 


11 


00010010 


11/9,2 




18 


12 


0001001 1 


1 1/9,3 




19 


13 


00010 100 


1 1/9,4 




20 


14 


00010 101 


1 1/9,5 




21 


15 


0001011Q 


1 1/9,6 




22 


16 


00010111 


1 1/9,7 




23 


17 


00011000 


1 1/9, 8 




24 


18 


00011001 


1 1/9,8, 1 




25 


19 


00011010 


1 1,9,8,2 




26 


1A 


00011011 


1 1,9,8,3 




27 


1B 


00011 100 


11,9,8,4 




28 


1C 


00011 101 


1 1,9,8,5 




29 


ID 


00011 110 


1 1,9,8,6 




30 


1E 


000 11 11 1 


11/9,8,7 




31 


1F 


00100000 


11,0,9,8, 1 




32 


20 


00100001 


0,9,1 




33 


21 


00100010 


0,9,2 




34 


22 


0010001 1 


0,9,3 




35 


23 


00100100 


0,9,4 




36 


24 


00100 101 


0,9,5 




37 


25 


00100110 


0,9,6 




38 


26 


00100 11 1 


0,9,7 




39 


27 


00101000 


0,9,8 




40 


28 


00101001 


0,9,8, 1 




41 


29 


00101010 


0,9,8,2 




42 


2A 


0010101 1 


0,9,8,3 




43 


2B 


00101 100 


0,9,8,4 




44 


2C 


00101 101 


0,9,8,5 




45 


2D 


00101 110 


0,9,8,6 




46 


2E 


00101 11 1 


0,9,8,7 




47 


2F 


00110000 


12,11,0,9,8,1 




48 


30 


001 10001 


9,1 




49 


31 


001 10010 


9,2 




50 


32 


00110011 


9,3 




51 


33 


001 10100 


9,4 




52 


34 


00110101 


9,5 




53 


35 


001 10110 


9,6 




54 


36 


0011011 1 


9,7 




55 


37 


00111000 


9,8 




56 


38 


00111001 


9,8,1 




57 


39 
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00111010 


9,8,2 




58 


3A 


00111011 


9,8,3 




59 


3B 


00111 100 


9,8,4 




60 


3C 


001 1 1 10 1 


9,8,5 




61 


3D 


00111110 


9,8,6 




62 


3E 


00111111 


9,8,7 




63 


3F 


0 1000000 




blank 


64 


40 


A 4 A A A A A 4 

0 100000 1 


12, 0, 9, 1 




65 


41 


0 100001 0 


12,0,9,2 




66 


42 


A A A A ii 4 

0 100001 1 


12,0, 9, 3 




67 


43 


0 1000 100 


1 2, 0, 9,4 




68 


44 


0 1000 10 1 


12,0,9,5 




69 


45 


01000110 


12, 0,9,6 




70 


46 


A 4 A A A 41 -i 

01000 111 


12, 0, 9, 7 




71 


47 


01001000 


12,0,9,8 




72 


48 


0 100 100 1 


12, 8, 1 




73 


49 


A 4 A A 4 A 4 A 

01001010 


12,8,2 




74 


4A 


A 4 A A 4 A 4 4 

0 1001 01 1 


12,8,3 


. (period) 


75 


4B 


0 1001 100 


12,8,4 


<- 


76 


4C 


0 1001 10 1 


12, 8, 5 


( 


77 


4D 


0 100 1 1 1 0 


12, 8, 6 


+ 


78 


4E 


0 100 1 111 


12, 8, 7 




79 


4F 


f\ 4 s\ 4 A AAA 

010 10 000 


12 


& 


80 


50 


A 4 A 4 A A A 4 

0 10 1000 1 


12, 1 1,9,1 




81 


51 


A 4 A 4 A A 4 A 

01010010 


12, 1 1 ,9,2 




82 


52 


A 4 A 4 A A 4 t 

01010 01 1 


12, 1 1 ,9,3 




83 


53 


01010100 


12,11,9,4 




84 


54 


A 4 A 4 A 4 A 4 

0 10 10 10 1 


12, 1 1,9,5 




85 


55 


A in « A 4 « A 

0 10 10 1 1 0 


12, 1 1,9,6 




86 


56 


A 4 A 4 A 4 4 4 

0 10 10 1 1 1 


12, 1 1 ,9,7 




87 


57 


A 4A4 « A A A 

01011 000 


12, 11,9,8 




88 


58 


A<1A1*1AA4 

01011001 


11,8,1 




89 


59 


A 4A4 4 A 4 A 

01011010 


11,8,2 




90 


5A 


A 4A 4 4 A 4 4 

01011011 


11,8,3 


$ 


91 


5B 


01011 100 


1 1,8,4 


* 


92 


5C 


01011101 


1 1,8,5 


) 


93 


5D 


0 10 1 1 1 1 0 


11,8,6 


94 


5E 


0 10 1 1 1 1 1 


1 1,8,7 




95 


5F 


0 1 100000 


1 1 




96 


60 


A 4 4 A A A A «■ 

0 1 1 0000 1 


0,1 


/ 


97 


61 


A 4 <■ A A A 4 A 

0 1 1 0001 0 


1 1,0,9,2 


98 


62 


A44AAA4 4 

0110001 1 


11,0, 9,3 




99 


63 


A44 AA « A A 

01100100 


1 1, 0,9,4 




100 


64 


A44AA 4 A 4 

01100101 


11,0,9,5 




101 


65 


A44AA 4 4A 

01100110 


1 1,0, 9, 6 




102 


66 


A44AA44 4 

0 1 100 1 1 1 


1 1,0,9,7 




103 


67 


01101000 


1 1 , 0, 9, 8 




104 


68 


01101001 


0,8,1 




105 


69 


01101010 


12, 1 1 




106 


6A 


01101011 


0,8,3 


, 


107 


6B 


01101100 


0,8,4 


% 


108 


6C 


01101101 


0,8,5 




109 


6D 


A44A4 44A 

01101 110 


0,8,6 




110 


6E 


A 4 4 A 4 44 4 

01101 111 


0,8,7 




111 


6F 


A 4 4 4AAAA 

011 10000 


1 2, 1 1 ,0 




112 


70 


A 4 4 4AAA 4 

011 1000 1 


12, 1 1,0,9, 1 




113 


71 


A44 4AA4A 

01110010 


12, 1 1,0,9,2 




114 


72 


01110011 


12, 11,0,9,3 




115 


73 


0 11 10100 


12, 1 1,0,9,4 




116 


74 


01110101 


12, 1 1,0,9,5 




117 


75 


011 10110 


12, 1 1 ,0,9,6 




118 


76 


011 10 11 1 


12, 11,0,9,7 




119 


77 


01111 000 


12,11,0,9,8 




120 


78 


ni 1 1 1 A A 4 

U 1 1 1 1 UU 1 


8, 1 




121 


79 


01111010 


8,2 




122 


7A 


01111011 


8,3 


# 


123 


7B 


. 011 11 100 


8,4 




124 


7C 


01111 101 


8,5 


1 


125 


7D 
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01111110 


8,6 


= 


126 


7E 


01111111 


8,7 




127 


7F 


10000000 


12,0, 


8,1 


128 


80 


10000001 


12,0, 


1 1 


129 


81 


10000010 


12, 0 4 


2 


130 


82 


10000011 


12,0, 


3 


131 


83 


10000 100 


12,0, 


,4 


132 


84 


10000101 


12,0, 


r5 


133 


85 


10000110 


12,0, 


,6 


134 


86 


1000011 1 


12,0, 


7 


135 


87 


10001000 


12,0, 


,8 


136 


88 


10001001 


12,0, 


9 


137 


89 


10001010 


12,0, 


,8,2 


138 


8A 


1000101 1 


12,0, 


8,3 


139 


8B 


10001 100 


12,0, 


8,4 


140 


8C 


10001 101 


12,0, 


8,5 


141 


8D 


10001 110 


12, 0, 


8,6 


142 


8E 


10001 111 


12,0, 


8,7 


143 


8F 


10010000 


12, 1 1 


,8,1 


144 


90 


10010001 


12, r 


If 1 


145 


91 


10010010 


12,1* 


,2 


146 


92 


1001001 1 


12, V 


t/3 


147 


93 


10010100 


12,11 


,4 


148 


94 


10010101 


12, r 


1, 5 


149 


95 


10010110 


12, V 


I, 6 


150 


96 


1001011 1 


12, V 


,7 


151 


97 


1001 1Q00 


12,1 1 


,8 


152 


98 


1001100 1 


12, r 


1 , 9 


153 


99 


10011010 


1 2, 1 « 


,8,2 


154 


9A 


1001101 1 


12, V 


1,8,3 


155 


9B 


10011 100 


12, 1 1 


,8,4 


156 


9C 


10011 101 


12, r 


,8,5 


157 


9D 


10011110 


12, V 


,8,6 


158 


9E 


10011 11 1 


12, 11 


,8,7 


159 


9F 


10100000 


11,0, 


8,1 


160 


AO 


10100001 


1 1,0, 


1 


161 


A1 


101 0001 Q 


11,0, 


2 


162 


A2 


1010001 1 


11,0, 


3 


163 


A3 


10100100 


11,0, 


4 


164 


A4 


10100101 


11,0, 


5 


165 


A5 


10100 110 


11,0, 


6 


166 


A6 


10100 11 1 


11,0, 


7 


167 


A7 


10101000 


1 1,0, 


8 


168 


A8 


10101001 


11,0, 


9 


169 


A9 


10101010 


11,0, 


8,2 


170 


AA 


1010101 1 


1 1,0, 


8, 3 


171 


AB 


10101 100 


11,0, 


8,4 


172 


AC 


10101 101 


11,0, 


8,5 


173 


AD 


10101110 


11,0, 


8,6 


174 


AE 


1010111 1 


11,0, 


8,7 


175 


AF 


101 10000 


12,11 


,0,8,1 


176 


BO 


101 10001 


12, 1 ' 


1,0,1 


177 


B1 


101 10010 


12, 1 \ 


,0,2 


178 


B2 


101 1001 1 


12, 1* 


,0,3 


179 


B3 


101 10 100 


12, 1 1 


,0,4 


180 


B4 


10110101 


12,11 


,0,5 


181 


B5 


101 10110 


12,1" 


,0,6 


182 


B6 


101 10 11 1 


12, V 


,0,7 


183 


B7 


101 11000 


12, r 


,0,8 


184 


B8 


101 11001 


12, 1* 


,0,9 


185 


B9 


10111010 


12, V 


,0,8,2 


186 


BA 


1011101 1 


12, r 


1,0,8,3 


187 


BB 


10111 100 


12,1" 


,0,8,4 


188 


BC 


101 11 101 


12, r 


1,0,8,5 


189 


BD 


10111110 


12, V 


,0,8,6 


190 


BE 


10111111 


12, r 


1,0,8,7 


191 


BF 


1 1000000 


12,0 




192 


CO 


1 1000001 


12, 1 


A 


193 


C1 
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1 IU UU U 1 U 


11 o 

1 2, 2 


B 


■ A fl 

19 4 


C2 


1 innn ni 1 

1 1UUUU1 1 


1 1 n 
1 2, J 


C 


i y d 


Co 


i m nn inn 
1 IU UU 1 UU 


1 2 t 4 


D 


iy o 


r< fi 
C4 


1 1UUU IU 1 


12/0 


E 


1 m 

i y / 


CD 


1 lAnn tin 
1 iuuu 1 1 u 


1 Z , O 


F 


■ nn 

i y b 


Cb 


1 m nn 1 1 1 

I IU UU I J I 


1 O "7 
1 Z , 1 


G 


1QQ 

i y y 


C / 


1 inn 1 nnn 


1 O Q 

1 Z , a 


TJ 

n 


o n n 
2UU 


r> Q 
Cb 


1 mninni 

J I U U I UU I 


1 O Q 
I Z f 3 


T 

I 


on 1 
zU 1 


cy 


1 inninm 

1 lUUlUlU 


1 0 n Q Q O 




on o 
2U2 


CA 


1 innini 1 

I IU U I U J I 


1 *3 n Q Q "3 




20J 


CB 


i mni inn 
i lUUl 1UU 


1 1 n o q ii 
12/0 # y, 0,4 
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CC 


1 mni mi 

I JU U I I U I 


n n o q c. 

i u, y, a, d 




one 
20 D 


CD 


i mm 1 1 n 

1 IUU 1 1 1U 


1 o n o q a 




20b 


CE 


1 mm 11 1 

I IUU I 111 


1 o n Q Q "7 

i 2, U/ y , b/ / 




on *7 
ZU / 


CF 


1 1 U 1 U UU U 


11 n 
1 1 r u 




i n o 
20b 


r>n 
DO 


1 1 n 1 n nn 1 
I J U 1 u UU 1 


11 1 
li/i 


J 


nnn 

zoy 


n 1 
Dl 


i in inn i n 

1 IU IUU 1 U 


11 o 

1 1 , z 


K 


O 1 A 

Z 1 0 


D2 


1 m 1 n n 1 1 

l IU 1 U U J 1 


11 3 


L 


O 1 1 

21 1 


DJ 


iminmn 
1 1 U 1 U i u U 


11 ll 


n 


n « n 

2 1 Z 


rtfi 
D4 


1 m in mi 

I I U I U I U I 


11 n 

I 1 / 0 


XT 

N 


O 1 3 
Z 1 J 


r\ c 
DD 


i m in 1 1 n 

1 IU IU 1 1 u 


11 a 

1 1 , b 


U 


O 1 fl 

Z 1 4 


Db 


i in in 1 1 1 

I IU 1 U 1 J 1 


11 "7 
11// 




O 1 c 
Z 1 D 


D / 


1 in i i nn n 

1 IU 1 1 uuu 


11 Q 

1 1 , b 


Q 


O 1 c 

Z 1 b 


Db 


1 m iinn 1 
1 1 U I 1 UU 1 


11 Q 

n, y 


R 


n 1 "7 

zl / 


rvQ 

Dy 


i miinin 

1 1 U 1 1 U 1 u 


11 11 Q O O 

12, 1 1 ,y,o f Z 




O 1 o 
Z 1 b 


DA 


1 miini 1 

I IU ] I U ] I 


10 11 Q Q 'a 




O 1 o 

zl y 


•no 

Dd 


i in 1 1 inn 

1 1 U 1 1 IUU 


JO 1 1 Q Q fl 

12, ii / y / o , 4 




nnn 

zzO 


DC 


1 in 11 m 1 
i IU 1 1 1U1 


1 Zf 11,3/0/3 




O n 1 
ZZ I 


DD 


1 in 1 1 1 1 n 

1 IU 11 1 I u 


10 11 Q Q £ 




o o o 
ZZZ 


Dti 


I IU 1 1 II 1 


in 11 O Q "7 

iZ/ 1 1 , y , o , / 




ZZ J 


DF 


111 nn nnn 
111 uu uuu 


n q o 
U , o , Z 




O O fl 

ZZ4 


EO 


1 1 1 nn nn 1 

I I I UU UU I 


i 1 n o 1 
1 1 / u , y , 1 




nnr 

ZZ o 


•n 1 
El 


1 1 mnni n 
ill UU U 1 U 


n o 
0,2 


S 


n n c 
ZZO 


n n 

E2 


1 unnm 1 
1 11 UUU 1 l 


n o 
0,3 


T 


n m 

227 


•n n 

E3 


1 1 1 An inn 

ill UU IUU 


n ii 
0,4 


U 


228 


E4 


1 nnn m 1 
ill UU I U 1 


n c 
0/0 


V 


nnn 

229 


E5 


1 i inn h n 

1 1 1 UU 1 1 U 


n £ 
0,b 


W 


nnn 
Z JU 


Eb 


1 1 1 nn 1 1 1 

I I I UU I I I 


n 7 
u , / 


v 

A 


O "3 1 

2 J 1 


E / 


1 iininnn 
1 i i U 1 uuu 


n o 
u , o 


v 
I 


nnn 

Z5Z 


E8 


1 1 1 n 1 nn 1 

I I I U I u U I 


n q 
u,y 


L 


n n -j 


Ey 


i iimnin 

1 1 1 U 1 U 1 U 


11 no q o 

• i / o,y , a, 2 




O 1 1t 

2 J4 


EA 


11 mini 1 

I I I U I U I I 


11 n q fl a 
1 1 , u, y, o, d 




nnc 
2 5 D 


EB 


1 iini inn 

1 1 1 U 1 IUU 


11 n q a fi 

1 1 , u,y, o, 4 




nnc 

2 J b 


EC 


1 nn 1 m 1 

I I I U I I U I 


1 1 n q q ^ 
1 1 , u, y, o, d 




Oil 

2 J / 


hu 


iiiniiin 

1 i 1 U i 1 ill 


11 n Q Q G. 

ii,u,y,b,o 




nnn 

2 J b 


EE 


1 uni ii 1 

I I I U I I l I 


1 1 n O Q "7 

1 1 , o, y, b, / 




nnn 

2 jy 


EF 


i ii <i f\ r\r\ (\ 
1 1 1 1 u UU u 


u 


ft 
U 


n fi a 
240 


F0 


I 11 mnn 1 

II I I u UU 1 


1 
i 


1 
1 


n fi 1 

24 1 


XI 1 

F I 


111 1 U U 1 u 


n 
Z 


n 
2 


n fi n 
242 


ti n 
F2 


1 1 1 mm 1 

1 111UU1 1 


n 


J 


n.fi o 
24 j 


"CI o 

F3 


1 ii m inn 

llllUlt' 0 


ll 

4 


fl 


244 


F4 


1 ii m in 1 

I 1 1 1 U 1 U 1 


c 
O 


c 

b 


n fi c 
245 


■CI C 

F5 


i iiiniin 

1 11 1 U 1 1 u 


O 


b 


o fi a 
24b 


Fb 


1111 n 1 i 1 

I I 1 I U I I I 


1 


"7 

/ 


Ofl o 
24 / 




1 11 i i nnn 

l 11 1 1 u u u 


a 
o 


Q 

o 


O fl Q 

24b 


TJfl 

rb 


1 1 1 1 mn 1 

I I 1 1 1 UU 1 


Q 

y 


Q 

y 


O fl o 
24y 


F9 


iiiiinin 

11111 Ul u 


1 O 1 1 nQQT 

I2,ii,u,y,b,z 




o en 
2 DO 


r A 


11111011 


19,11 0 9.8 T 

1 ^ , 1 l/V/^/O/O 




o?i 


•OR 

r d 


11111 100 


12, 11,0,9,8,4 




252 


FC 


11111101 


12, 11,0/9,8,5 




253 


FD 


11111110 


12, 11,0,9,8,6 




254 


FE 


11111111 


12,11,0,9,8,7 




255 


FF 
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APP ENDIX B: MACHINE-INSTRUCTION MNEMONIC O PERATION COD ES 



This appendix contains a table of the mnemonic operation codes for all machine 
instructions that can be represented in assembler language, including extended mnemonic 
operation codes. It is in alphabetic order by instruction. Indicated for each 
instruction are both the mnemonic and machine operation codes, explicit and implicit 
operand formats, program interruptions possible, and condition code set. 



The column headings in this appendix and the information each column provides follow. 



Instruction ; This column contains the name of the instruction associated with the 
mnemonic operation code. 



Mnemonic Operation Code ; This column gives the mnemonic operation code for the machine 
instruction. This is written in the operation field when coding the instruction. 



Machine Operation Cod e; This column contains the hexadecimal eguivalent of the actual 
machine operation code. The operation code will appear in this form in most storage 
dumps and when displayed on the system control panel. For extended mnemonics, this 
column also contains the mnemonic code of the instruction from which the extended 
mnemonic is derived. 



Operand Forma t; This column shows the symbolic format of the operand field in both 
explicit and implicit form. For both forms, R1, R2, and R3 indicate general registers 
in operands one, two, and three, respectively. X2 indicates a general register used as 
an index register in the second operand. Instructions which reguire an index register 
(X2) but are not to be indexed are shown with a 0 replacing X2. L, L1, and L2 indicate 
lengths for either operand, operand one, and operand two, respectively. 



For the explicit format, D1 and D2 indicate a displacement and B1 and B2 indicate a 
base register for operands one and two. 



For the implicit format, D1,B1 and D2,B2 are replaced by S1 and S2 which indicate a 
storage address in operands one and two. 



Type of Instruction : This column gives the basic machine format of the instruction (RR, 
RX, SI, or SS) . If an instruction is included in a special feature or is an extended 
mnemonic, this is also indicated. 



Program Interruptions Possible : This column indicates the possible program 
interruptions for this instruction. The abbreviations used are: A - Addressing, S - 
Specification, Ov - Overflow, P - Protection, Op - Operation (if feature is not 
installed) and other - other interruptions which are listed. The type of overflow is 
indicated by: D - Decimal, E - Exponent, or F - Floating Point. 



Condition Code Set : The condition codes set as a result of this instruction are 
indicated in this column. (See legend following the table) . 
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Instruction 


Mnemonic 
Operation 
Code 


Machine 
Operation 
Code 


Operand Format 
Explicit Implicit 


Add 


A 


5A 


R1,D2(X2,B2) or R1, D2(,B2) 


Rl,S2(X2)or R1,S2 


Add 


AR 


1A 


R1,R2 




Add Decimal 


AP 
Ar 


PA 

rA 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Aaa nairwora 


A u 
AM 


AA 
4A 




ft I , J* \A*/OI ft 1 , a£ 


Add Logical 


Al 
AL 


5P 


Rl,D2(X2,B2)orRl,D2( / B2) 


R1,S2(X2)orRl,S2 


Add Logical 


ALR 


IE 


R1,R2 




Add Normalized, Long 


AD 


6A 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Add Normal izod/ Lona, 


A HP 


2A 


R1,R2 






AC 
AC 


7A 
/A 




Dl 0/V0\»- DI CO 

K 1 , it(A/)or Rl ,,Sc 


Add Normalized/ Short 


APP 
ACK 


•J A 
OA 


R1,R2 




Add Unnormalized,Lohg 


AW 


6E 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Add Unnormal ized, Long 


AWR 


2E 


R1,R2 




Add Unnormal i zed / Short 


Al 1 


/C 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Aaa unnormal izea, onort 


Al ID 
AUK 


*5P 


Rl R2 




And Logical 


in 


>\A 


Rl,'D2(X2,B2)orRl f D2(,B2) 


Rl,S2(X2)orRl,S2 


And Logical 


NC 


D4 


D1(L,B1),D2(B2) 


S1(L),S2 or S1,S2 


And Logical 


NR 


14 


R1,R2 




And Logical Immediate 


Ml 
INI 


94 


D1(B1),I2 


SI, 12 


Branch and Link 


DAL 


Al 




Dl WfY9W PI CT 

Kl , Ji\AiJOr Kl , it 


Branch and Link 


DAI P 
DALK 


ns 


R1,R2 




Branch on Condition 


BC 


47 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Branch on Condition 


BCR 


07 


R1,R2 




Branch on Count 


BCT 


46 


l\ 1 , W^A1| IV 1 , L/£\, DX/ 


PI 0/Y9W PI C9 
It 1 , j£\A£^Or Kl, J£ 


Branch on Count 


BCTR 


06 


R1,R2 




Rrnnrk on Fminl 


BE 


A7(RC R\ 

Hf\D\* Of 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on High 


BH 


47(BC 2) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Index High 


BXH 


86 


R1,R3,D2(B2) 


R1,R3,S2 


Branch on Index Low or Equal 


BXLE 


87 


R1,R3,D2(B2) 


R1,R3,S2 


Branch on Low 


BL 


47(BC 4) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch if Mixed 


BM 


47(BC 4) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Minus 


BM 


47(BC 4) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Not Equal 


BNE 


47(BC 7) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Not High 


BNH 


47(BC 13) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Not Low 


BNL 


47(BC 11) 


D2(X2, B2)or D2(,B2 ) 


S2(X2 ) or S2 


Branch if Ones 


BO 


47(BC 1) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Overflow 


BO 


47(BC 1) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Plus 


BP 


47(BC 2) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch if Zeros 


BZ 


47(BC 8) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Zero 


BZ 


t/yov* Of 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Rrnnrh I InmnHitinnnI 

Ui UI 11*1 1 \J 1 IV» |U II |V( M 1 




A7(RC Ti^ 


D2(X2 B2W D2( B2^ 


S2(X2\ or S2 


Rrnnr*n 1 lnf*onrJitirtrvil 
ui ui i^i i ui iwunu 1 1 1 uiiu i 


BR 


mincfi i 4 


R2 




Compare Algebraic 


C 


59 


Rl,D2(X2,B2)or R1,D2(,B2) 


Rl,S2(X2orRl,S2 


Compare Algebraic 


CR 


19 


R1,R2 




Compare Decimal 


CP 


F9 


fM /I 1 D1\ fY5/l O DO\ 


5I(L1), 52(L2)or 51,52 


Pnmnnrp Hnl&A#rtrrl 
v^uiiipuic nuiiwuiu 


CH 


49 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Compare Logical 


CL 


55 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Compare Logical 


CLC 


D5 


D1(L,B1),D2(B2) 


S1(L),S2 orSl,S2 


Compare Logical 


CLR 


15 


R1,R2 




Compare Logical Immediate 


CLI 


95 


D1(B1),I2 


SI, 12 


Compare, Long 


CD 


69 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Compare, Long 


CDR 


29 


R1,R2 




Compare, Short 


CE 


79 


Rl,D2(X2,B2)or R1,D2(,B2) 


Rl,S2(X2)or R1,S2 


Compare, Short 


CER 


39 


R1,R2 




Convert to Binary 


CVB 


4F 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Convert to Decimal 


CVD 


4E 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 



Operand Format (Add) 
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Instruction 


Type of 
Instruction 


Program Interruption 
Possible 




Condition Code Set 




A 


s 


Ov 


p 


Op 


Other 


00 


01 


10 


11 


Add 


RX 


X 


X 


c 
r 








Sum=0 


oum u 


C lim *>fl 


Overflow 


Add 


RR 






r 

r 








Sum=0 


iumv. u 


c lir _ 
oum -^u 


Overflow 


Add Decimal 


SS, Decimal 


X 




n 


X 


X 


UQTQ 


Sum=0 


Sum ^ 0 


Sum ^0 


Overflow 


Add Halfword 


RX 


X 


X 


p 

r 








Sum=0 


Sum ^0 


Sum ^0 


Overflow 


Add Logical 


RX 


X 


X 










Sum=0© 


Sum 0© 


Sum= 0© 


Sum 0 © 


Add Logical 


RR 














Sum=0© 


Sum= Off?) 


Sum= 0(T) 


Sum 0 © 


Add Normalized, Long 


RX,Floating Pt. 


x 


x 






x 


B,C 


R 


L 


M 




Add Normalized, Long 


RR, Floating Pt. 




x 


F 
C 




x 


B, C 


R 


L 


M 


p 


Add Normalized, Short 


RX,Floating Pt. 


X 




c 




X, 


n c 


R 


L 


M 


p 


Add Normalized, Short 


RR,Floating Pt. 




X 


E 




X 


B,C 


R 


L 


M 


p 


Add UnnormaHzed,Long 


RX, Floating Pt. 


X 


X 


p 




X 


c 


R 


i 

L 


M 
IVl 


P 


Add Unnormalized, Long 


RR, Floating Pt. 




x 


p_ 






Q 


R 


L 


M 




Add Unnormalized, Short 


RX, Floating Pt. 


X 


x 


p 




X 


Q 


R 


L 


M 


p 


Add Unnormalized, Short 


RR,Floating Pt. 




X 


p 




X 


c 


R 


■ 

L 


(VI 


p 


Add Logical 


RX 


X 


X 










J 


K 






And Logical 


SS 


X 






X 






J 








And Logical 


RR 














J 








And Logical Immediate 


SI 


x 












J 


1^ 






Branch and Link 


RX 














N 


Kl 
IN 


Kl 
IN 


N 


Branch and Link 


RR 














N 


N 


N 


N 


Branch on Condition 


RX 














N 


IN 


Kl 
IN 


N 


Branch on Condition 


RR 














N 


IN 


Kl 
IN 


N 


Branch on Count 


RX 














N 


Kl 
IN 


Kl 
IN 


N 


Branch on Count 


RR 














N 


N 


N 


N 


Branch on Equal 


RX, Ext.Mnemonic 














N 


N 


N 


N 


Branch on High 


RX, Ext. Mnemonic 














Kl 

IN 


N 


N 


N 


Branch on Index High 


RX, Ext.Mnemonic 














N 


Kl 
IN 


IN 


N 


Branch on Index Low or Equal 


RX, Ext.Mnemonic 














N 


N 


N 


N 


Branch on Low 


RX, Ext .Mnemonic 














N 


N 


N 


N 


Branch if Mixed 


RX, Ext.Mnemonic 














N 


N 


N 


N 


Branch on Minus 


RX, Ext.Mnemonic 














N 


N 


N 


N 


Branch on Not Equal 


RX, Ext.Mnemonic 














N 


Kl 
IN 


Kl 
IN 


N 


Branch on Not High 


RX, Ext.Mnemonic 














N 


N 


N 


N 


Branch on Not Low 


RX, Ext.Mnemonic 














N 


N 


N 


N 


Branch if Ones 


RX, Ext. Mnemoni c 














N 


N 


N 


N 


Branch on Overflow 


RX, Ext.Mnemonic 














N 


N 


N 


N 


Branch on Plus 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch if Zeros 


RX,Ext. Mnemonic 














N 


N 


N 


N 


Branch on Zero 


RX, Ext.Mnemonic 














N 


N 


N 


N 


Branch Unconditional 


RX , Ext. Mnemonic 














N 


N 


N 


N 


Branch Unconditional 


RR, Ext.Mnemonic 














N 


N 


N 


N 


Compare Algebraic 


RX 














Z 


AA 


BB 




Compare Algebraic 


RR 














z 


AA 


BB 




Compare Decimal 


SS, Decimal 










X 


Data 


z 


MM 


BB 




Compare Halfword 


RX 


X 


X 










z 


AA 


BB 




Compare Logical 


RX 


X 


X 










z 


AA 


BB 




Compare Logical 


RX 


X 


X 










z 


AA 


BB 




Compare Logical 


SS 


X 












z 


AA 


BB 




Compare Logical Immediate 


SI 


X 












z 


AA 


BB 




Compare, Long 


RX, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Long 


RR, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Short 


RX, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Short 


RR,Floating Pt. 




X 






X 




z 


AA 


BB 




Convert to Binary 


RX 


X 


X 








Data,F 


N 


N 


N 


N 


Convert to Decimal 


RX 


X 


X 




X 






N 


N 


N 


N 



Condition Code Set (Add) 
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Instruction 


Mnemonic 
Operation 
Code 


Machine 
Operation 
Code 


Operand Format 
Explicit Implicit 


Divide 


D 


5D 


Rl , D2(X2, B2) or Rl , D2(, B2) 


Rl, S2(X2) 


or Rl , S2 


Divide 


DR 


ID 


R1,R2 






Divide Decimal 


DP 


FD 


D1,(L1 / B1),D2(L2,B2) 


S1(L1),S2(L2 


or S1,S2 


Divide, Long 


DD 


6D 


Rl,D2(X2,B2),or R1,D2(,B2) 


R1,S2(X2) 


or Rl , S2 


Divide, Long 


DDR 


2D 


Rl ,R2 






Divide, Short 


DE 


7D 


Rl ,D2(X2, B2)or Rl , D2(,B2) 


R1,S2(X2) 


or R1,S2 


Divide, Short 


DER 


3D 


R1,R2 






Edit 


ED 


DE 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Edit and Mark 


EDMK 


DF 


DHL.BH.D2(B2i 


SHL). S2 


or SI , S2 


Exclusive Or 


X 


57 


Rl , D2(X2, B2) or Rl , D2(, B2) 


Rl, S2(X2) 


or Rl , S2 


Exclusive Or 


xc 


D7 


D1(L.B1),D2(B2) 


S1(L),S2 


or SI , S2 


Exclusive Or 


XR 


17 


R1,R2 






Exclusive Or Immediate 


XI 


97 


D1(B1),12 


SI, 12 




Execute 


EX 


44 


Rl , D2(X2, B2) or Rl , D2(, B2) 


Rl, S2(X2) 


R1,S2 


Halve, Long 


HDR 


24 


R1,R2 






Halve, Short 


HER 


34 


R1,R2 






Halt I/O 


HIO 


9E 


D1(B1) 






Insert Character 


IC 


43 


R1,D2(X2, B2) or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Insert Storage Key 


ISK 


09 


R1,R2 






Load 


L 


58 


Rl , D2(X2, B2) or Rl , D2(, B2) 


R1,S2(X2) 


or Rl , S2 


Load 


LR 


18 


R1,R2 






Load Address 


LA 


41 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load and Test 


LTR 


12 


R1,R2 






Load and Test, Long 


LTDR 


22 


Rl ,R2 






Load and Test, Short 


LTER 


32 


R1,R2 






Load Complement 


LCR 


13 


Rl ,R2 






Load Complement, Long 


LCDR 


23 


R1,R2 






Load Complement, Short 


LCER 


33 


R1,R2 






Load Halfword 


LH 


48 


Rl D2fX2 R2) or Rl D2( R2\ 


Rl ^2^V2^ 


nr Rl W 


Load, Long 


LD 


68 


Rl D2fX2 B2} or Rl 02( R21 


Rl S2fX21 


nr Rl <i2 

\Jl fx 1 / 


Load, Long 


LDR 


28 


R1,R2 






Load Multiple 


LM 


98 


R1,R3,D2(B2) 


R1,R3,S2 




Load Negative 


LNR 


1 1 


R1,R2 






Load Negative, Long 


LNDR 


21 


R1,R2 






Load Negative, Short 


LNER 


31 


R1,R2 






Load Positive 


LPR 


10 


R1,R2 






Load Positive, Long 


LPDR 


20 


R1,R2 






Load Positive, Short 


LPER 


30 


R1,R2 






Load P5W 


LPSW 


82 


D1(B1) 






Load, Short 


LE 


78 


Rl , D2(X2, B2) or Rl , D2(, B2) 


R1,S2(X2) 


or R1,S2 


Load, Short 


LER 


38 


R1,R2 






Move Characters 


MVC 


D2 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Move Immediate 


MVI 


92 


D1(B1), 12 


SI, 12 




Move Numerics 


MVN 


Dl 


D1(L, B1),D2(B2) 


S1(L), S2 


or S1,S2 


Move with Offset 


MVO 


Fl 


D1(L1,B1),D2(L2,B2) 


S1(L1),S2(L2 


or S1,S2 


Move Zones 


MVZ 


D3 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


kA. A A? _| t . 

Multiply 


M 


5C 


Rl,D2(X2,B2)orRl / D2(,B2) 


R1,S2(X2) 


or R1,S2 


Multiply 


MR 


IC 


R1,R2 






Multiply Decimal 


MP 


FC 


Dl(Ll,Bi),D2(L2,B2) 


S1(L1),S2(L2) or S1,S2 


k A 1*1.1 II If -1 

Mulitply Halfword 


MH 


4C 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) 


or Rl,S2 


Multiply, Long 


MD 


6C 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Multiply, Long 


MDR 


2C 


R1,R2 






Multiply, Short 


ME 


7C 


R1,D2(X2, B2) or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Multiply, Short 


MER 


3C 


R1,R2 






No Operation 


NOP 


47(BC 0) 


D2(X2,B2) or D2(,B2) 


S2(X2) 


or S2 



Operand Format (Divide) 
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Instruction 


Type of 
Instruction 


Program Interruptions 
Possible 


Condition Code Set 




s 


Ov 


p 


On 


Other 


00 


01 


10 


1 ] 


Divide 


RX 












p 


N 


N 


N 


N 


Divide 


RR 




X 








F 


N 


N 


N 


N 


Divide Decimal 


SS, Decimal 


X 


X 




X 


X 


D, Data 


N 


N 


N 


N 


Divide, Long 


RX,Floating Pt. 






E 






B,E 


N 


N 


N 


N 


Divide, Long 


RR, Floating Pt. 






E 






B,E 


N 


N 


N 


N 


Divide, Short 


RX, Floating Pt. 


x 


x 


E 






B,E 


N 


N 


N 


N 


Divide, Short 


RR, Floating Pt. 




X 


E 




X 


B,E 


N 


N 


N 


N 


Edit 


SS, Decimal 


X 






X 


X 


Data 


S 


T 


U 




Edit and Mark 


SS, Decimal 












Data 


S 


T 


U 




Exclusive Or 


RX 














J 


K 






Exclusive Or 


SS 














J 


K 






Exclusive Or 


RR 














J 


K 






Exclusive Or Immediate 


SI 


X 






X 






J 


K 






Execute 


RX 




x 








Q 


(May be set by this instruction) 




Halve, Long 


RR, Floating Pt. 




x 






X 




IN 


IN 


N 


Kl 
IN 


Halve, Short 


RR, Floating Pt. 














IN 


IN 


Kl 
IN 


N 


Halt I/O 


SI 












A 


DD 


cc 


GG 


KK 


Insert Character 


RX 


X 












N 


N 


N 


N 


Insert Storage Key 


RR 














IN 


Kl 
IN 


Kl 
IN 


N 


Load 


RX 














M 
IN 


Kl 
IN 


Kl 
IN 


N 


Load 


RR 














M 
IN 


Kl 
IN 


Kl 
IN 


N 


Load Address 


RX 














N 


N 


N 


N 


Load and Test 


RR 














J 


L 


M 




Load and Test, Long 


RR, Floating Pt. 
















I 

L 


KA 




Load and Test, Short 


RR, Floating Pt. 
















1 

L 


KA 




Load Complement 


RR 






p 








p 


1 

L 


KA 




Load Complement, Long 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Complement, Short 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Halfword 


RX 














N 


N 


N 


Kl 
IN 


Load, Long 


RX, Floating Pt. 














N 


N 


N 


N 


Load, Long 


RR, Floating Pt. 














N 


N 


N 


N 


Load Multiple 


RS 


X 


X 










N 


N 


N 


N 


Load Negative 


RR 














J 


L 






Load Negative, Long 


RR, Floating Pt. 














R 


L 






Load Negative, Short 


RR, Floating Pt. 














R 


L 






Load Positive 


RR 






p 








J 




M 


o 


Load Positive, Long 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Positive, Short 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load PSW 


SI 














QQ 


QQ 


QQ 


QQ 


Load, Short 


RX, Floating Pt. 














N 


N 


N 


N 


Load, Short 


RR, Floating Pt. 




X 










N 


N 


N 


N 


Move Characters 


SS 


X 






X 






N 


N 


N 


N 


Move Immediate 


SI 


X 






X 






N 


N 


N 


N 


Move Numerics 


SS 


x 






x 






N 


N 


N 


N 


Move with Offset 


SS 


x 






x 






N 


N 


N 


N 


Move Zones 


SS 


x 






x 






N 


N 


N 


N 


Multiply 


RX 


X 


X 










N 


N 


N 


N 


Multiply 


RR 




X 










N 


N 


N 


N 


Multiply Decimal 


SS, Decimal 


X 


X 




X 


X 


Data 


N 


N 


N 


N 


Multiply Halfword 


RX 


X 


X 










N 


N 


N 


N 


Multiply, Long 


RX, Floating Pt. 


X 


X 


E 




X 


B 


N 


N 


N 


N 


Multiply, Long 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


Multiply, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B 


N 


N 


N 


N 


Multiply, Short 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


No Operation 


RX, Ext.Mnemonic 














N 


N 


N 


N 



Condition Code Set (Divide) 
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Instruction 


Mnemonic 
Operation 
Code 


Machine 
Operation 
Code 


Operand Format 
Explicit Implicit 


No Operation 


INVJrK 


rtyln.ro n\ 


DO 
KZ 






Or Logical 


O 


56 


Dl PlO/VO DO\ Dl rvO / QO\ 

Kl , Uz^Xz, aZ) or Kl , Di\,oZ) 


Dl CO/YON 
K 1 , 5Z(AZ) 


Dl CO 

or K I , bz 


Or Logical 


oc 


D6 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Or Logical 


OR 


16 


R1,R2 






Or Logical Immediate 


OI 


96 


ni/D.'n io 
Ul l lz 


Cl IO 

dl , \z 




Pack 


PACK 


F2 


r»i l\ l m\ roll") no\ 
U\\L\ ,o\), UZ^lz, da) 


CI /I 1 \ CO/I 0^ 
b UL 1 iA[LZ) 


_ - Cl CO 

or b i , bz 


Read Direct 


RDD 


85 


m /qi \ io 


Cl IO 

51,12 




Set Program Mask 


SPM 


04 


Rl 






Set System Key 


SSK 


08 


R1,R2 






Set System Mask 


SSM 


80 


0 1 \o 1 ) 


Cl 

5 1 




Shift Left Double Algebraic 


SLDA 


8F 


K 1 , VZ(oZ) 


D 1 CO 

Kl, bz 




Shift Left Double Logical 


SLDL 


8D 


di r\o/oo\ 


D 1 CO 

Kl, bz 




Shift Left Single Algebraic 


SLA 


8B 


R1,D2(B2) 


R1,S2 




Shift Left Single Logical 


SLL 


89 


R1,D2(B2) 


R1,S2 




Shift Right Double Algebraic 


SRDA 


8E 


Rl ,DZ(B2) 


D 1 CO 

Kl, 52 




Shift Right Double Logical 


SRDL 


8C 


Rl , Dz(Bz) 


D 1 CO 

Kl , 52 




Shift Right Single Algebraic 


SRA 


8A 


nl no/oo\ 
Kl , UlyiZ) 


D 1 CO 

K 1 , 52 




Shift Right Single Logical 


SRL 


88 


R1,D2(B2) 


R1,S2 




Start I/O 


SIO 


9C 


D1(B1) 


SI 




Store 


ST 


50 


Rl ,D2(X2, B2) or Rl , DZ(, B2) 




or Rl , S2 


Store Character 


STC 


42 


R1,D2(X2, B2) or R1,D2(,B2 


Rl, D2(X2) 


or Rl , S2 


Store Halfword 


STH 


40 


Rl , D2(X2, B2) or Rl , D2(,B2) 


Rl,S2(X2) 


or Rl ,S2 


Store Long 


STD 


60 


R1,D2(X2, B2) 


Rl,S2(X2) 


or R1,S2 


Store Multiple 


STM 


90 


R1,R2,D2(B2) 


Rl,R2,S2 




Store Short 


STE 


70 


Rl , D2(X2, B2) or Rl , DZ(, B2) 


Kl,52(Xz) 


or Rl , S2 


Subtract 


S 


5B 


R 1 , D2(X2 


Dl CO/VO\ 


or Rl , S2 


Subtract 


SR 


IB 


Rl , R2 






Subtract Decimal 


SP 


FB 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2) 


or S1,S2 


Subtract Halfword 


SH 


4B 


R1,D2(X2, B2) or R1,D2(,B?) 


Rl,S2(X2) 


or R1,S2 


Subtract Logical 


SL 


5F 


Dl PlO/VO DO\ A _ Dl HO/ DO\ 

R 1 , L»z(X2, oZ) or Kl , uZ(, tiZ) 


Dl CO/VO\ 


Dl CO 

or Kl , bz 


Subtract Logical 


SLR 


IF 


D 1 DO 

K 1 , KZ 






Subtract Normalized, Long 


SD 


6B 


di r»o/YO d.o\ r\r di no/ no\ 

K 1 , UZ(XZ, DZ.) or Kl , \JZ\, DZ.) 


di co/YO^ 


pi co 
or ki , oz 


Subtract Normalized, Long 


SDR 


2B 


R1,R2 






Subtract Normalized, Short 


SE 


7B 


R1,D2(X2, B2) or R1,D2(,B2) 


Rl,S2(X2) 


or R1,S2 


Subtract Normalized, 


SER 


3B 


D 1 DO 
K 1 , KZ 






Subtract Unnormalized, Long 


SW 


6F 


di rv?/vo no\ di rot ro\ 
K I , uzlaz, oZ) or Kl , \jz\, dz.) 


pi co/Y0^ 

K I , 3Z \ AZ ) 


pi co 
or ki, oz 


Subtract Unnormalized, Long 


SWR 


2F 


R1,R2 






Subtract Unnormalized, Short 


SU 


7F 


R1,D2(X2,B2) or Rl , D2(,B2) 


Rl,S2(X2) 


or R1,S2 


Subtract Unnormalized, Short 


SUR 


3F 


R1,R2 






Supervisor Call 


SVC 


OA 


1 






Test and Set 


TS 


93 


D1(B1) 


SI 




Test Channel 


TCH 


9F 


D1(B1) 


SI 




Test I/O 


TIO 


9D 


Dl(BT) 


SI 




Test Under Mask 


TM 


91 


D1(B1),|2 


SI, 12 




Translate 


TR 


DC 


D1(L,B1),D2(B2) 


S1(L), S2 


orSl , 52 


Translate and Test 


TRT 


DD 


D1(L,B1),D2(B2) 


S1(L), S2 


orSl , S2 


Unpack 


UNPK 


F3 


D1(L1,B1),D2(L2,B2) 


S1(L1),S2(L2) 


or SI , S2 


Write Direct 


WRD 


84 


D1(B1),|2 


SI, 12 




Zero and Add Decimal 


ZAP 


F8 


D1(L1,B1),D2(L2,B2) 


S1(L1),S2(L2) 


or SI , S2 



Operand Format (No Operation) 
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Instruction 


Type of 
Instruction 


Program Interruptions 
Possible 


Condition Code Set 


A 


s 


Ov 


P 


Op 


Other 


00 


01 


,0 






No Operation 


RR, Ext.Mnemonic 














N 


N 


N 




N 


Or Logical 


RX 


X 


X 










J 


K 






Or Logical 


ss 


X 






X 






J 


K 






Or Logical 


RR 














J 


K 






Or Logical Immediate 


SI 


X 






X 






J 


K 






Pack" 


SS 


X 






X 






N 


N 


N 


N 


Read Direct 


SI 


X 






X 


X 


A 


N 


N 


N 


N 


Set Program Mask 


RR 














RR 


RR 


RR 


RR 


Set Storage Key 


RR 


x 


x 








A 


N 


N 


N 


N 


Set System Mask 


SI 


X 










A 


N 


N 


N 


N 


Shift Left Double Algebraic 


RS 




X 


F 








J 


L 


M 


O 


Shift Left Double Logical 


RS 




X 










N 


N 


N 


N 


Shift Left Single Algebraic 


RS 






F 








J 


L 


M 


O 


Shift Left Single Logical 


RS 














N 


N 


N 


N 


Shift Right Double Algebraic 


RS 




X 










J 


L 


M 




Shift Right Double Logical 


RS 




X 










N 


N 


N 


N 


Shift Right Single Algebraic 


RS 














J 


L 


M 




Shift Right Single Logical 


RS 














N 


N 


N 


N 


Start I/O 


SI 












A 


MM 


CC 


EE 


AA 


Store 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Character 


RX 


X 






X 






N 


N 


N 


N 


Store Halfword 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Long 


RX, Floating Pt. 


X 


X 




X 


X 




N 


N 


N 


N 


Store Multiple 


RS 








x 






N 


N 


N 


N 


Store Short 


RX, Floating Pt. 


X 


X 




X 


X 




N 


N 


N 


N 


Subtract 


RX 


X 


X 


F 








V 


X 


Y 


O 


Subtract 


RR 






F 








V 


X 


Y 


O 


Subtract Decimal 


SS, Decimal 


X 




D 


X 


X 


Data 


V 


X 


Y 


O 


Subtract Halfword 


RX 


x 


x 


F 








V 


X 


Y 


o 


Subtract Logical 


RX 


X 


X 












W,H 


V,l 


W,l 


Subtract Logical 


RR 
















W,H 


V,l 


W,l 


Subtract Normalized, Long 


RX, Floating Pt. 


X 


X 


E 




X 


B,C 


R 


L 


M 


Q 


Subtract Normalized, Long 


RR, Floating Pt. 




X 


E 




X 


B,C 


R 


L 


M 


Q 


Subtract Normalized, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B,C 


R 


L 


M 


Q 


Subtract Normalized, Short 


RR, Floating Pt. 




X 


E 




X 


B,C 


R 


L 


M 


Q 1 


Subtract Unnormalized, Long 


RX, Floating Pt. 


X 


X 


E 




X 


C 


R 


L 


M 


Q 


Subtract Unnormalized, Long 


RR, Floating Pt. 




X 


t 




X 


t_ 


K 


L 


M 
(VI 




Subtract Unnormalized, Short 


RX, Floating Pt. 


X 


X 


E 




X 


C 


R 


L 


M 


Q 


Subtract Unnormalized, Short 


KK, rloafing rr. 




X 


E 




X 


c 


R 


L 


M 


Q 


Supervisor Call 


RR 














N 


N 


N 


N 


Test and Set 


SI 


X 






X 






SS 


TT 






Test Channel 


SI 












A 


JJ 


II 


FF 


HH 


Test I/O 


SI 












A 


LL 


CC 


EE 


KK 


Test Under Mask 


SI 


X 












UU 


VV 




WW 


Translate 


SS 


X 






X 






N 


N 


N 


N 


Translate and Test 


SS 


X 












PP 


NN 


OO 




Unpack 


SS 


X 






X 






N 


N 


N 


N 


Write Direct 


SI 


X 








X 


A 


N 


N 


N 


N 


Zero and Add Decimal 


SS, Decimal 


X 




D 


X 


X 


Data 


J 


L 


M 


O 



Condition Code Set (No Operation) 
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Program 


Interruptions Possible 


Under Ov: D - Decimal 




E - Exponent 




F = Fixed Point 


Under Other: 




A Privileged Operation 




B Exponent Underflow 




C Significance 




D Decimal Divide 




E Floating Point Divide 




F Fixed Point Divide 




G Execute 


Condition Code Set 


H 


No Carry 


1 


Carry 


J 


Result = 0 


K 


Result is Not Equal to Zero 


L 


Result is Less Than Zero 


M 


Result is Greater Than Zero 


N 


Not Changed 


O 


Overflow 


P 


Result Exponent Underflows 


Q 


Result Exponent Overflows 


R 


Result Fraction = 0 


S 


Result Field Equals Zero 


T 


Result Field is Less Than Zero 


U 


Result Field is Greater Than Zero 


V 


Difference = 0 


W 


Difference is Not Equal to Zero 


X 


Difference is Less Than Zero 


Y 


Difference is Greater Than Zero 


Z 


First Operand Equals Second Operand 


AA 


First Operand is Less Than Second Operand 


BB 


First Operand is Greater Than Second Operand 


CC 


CSW Stored 


DD 


Channel and Subchannel not Working 


EE 


Channel or Subchannel Busy 


FF 


Channel Operating in Burst Mode 


GG 


Burst Operation Terminated 


HH 


Channel Not Operational 


II 


Interruption Pending in Channel 


JJ 


Channel Available 


KK 


Not Operational 


LL 


Available 


MM 


I/O Operation, Initiated and Channel Proceeding With its Execution 


NN 


Nonzero Function Byte Found Before the First Operand Field is Exhausted 


OO 


Last Function Byte is Nonzero 


PP 


All Function Bytes Are Zero 


QQ 


Set According to Bits 34 and 35 of the New PSW Loaded 


RR 


Set According to Bits 2 and 3 of the Register Specified by Rl 


SS 


Leftmost Bit of Byte Specified = 0 


TT 


Leftmost Bit of Byte Specified =1 


UU 


Selected Bits Are All Zeros; Mask is All Zeros 


W 


Selected Bits Are Mixed (zeros and ones) 


WW 


Selected Bits Are All Ones 



Program Interruptions Possible 
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ASSEM BLER-INSTRU CTIONS 



Mnemonic Name Field 

CCW An optional symbol 

CNOP blank 

CSECT An optional symbol 

DC An optional symbol 

DROP blank 

DS An optional symbol 

DSECT A required symbol 

EJECT blank 

END blank 

ENTRY blank 

EQU A required symbol 

EXTRN blank 

ICTL blank 

ISEQ blank 

LTORG an optional symbol 

ORG blank 

PRINT blank 

PUNCH blank 

REPRO blank 

SPACE blank 

START An optional symbol 

TITLE 0-4 characters 

USING blank 

XFR blank 



Operand Field 

Four operands, separated by commas 

Two decimal terms, separated 
by a comma 

Not used; treated as a comment 

One operand. 

One to five absolute 
expressions, separated by commas 

One operand 

Not used; treated as a comment 

Not used; treated as a comment 

A relocatable expression or blank 

One relocatable symbol 

An absolute or relocatable expression 

One relocatable symbol 

One to three decimal values, 
separated by commas 

Two decimal values, separated by a comma 
or a blank 

Not used; treated as a comment 
A relocatable expression or blank 
One to three operands 
1 to 80 characters 

enclosed in single quotation marks 

Not used; treated as a comment 

A decimal term or blank 

A self-defining term or blank 

A sequence of characters, 
enclosed in single quotation marks 

An absolute or relocatable 

expression followed by 1 to 5 absolute 

expressions, separated by commas 

A relocatable symbol 
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APPENDIX D: MACHINE— INSTRUCTION FORMAT 



r- 

| Form at 
| Code 


1 — - - - - 

Jlnstruction Format 
IShowing Bits 




■ i ■■ ■ - 

| Assembler Operand— 
|Field Format 
-| 


r -■■ 

| Applicable 
| Instructions 


v - ' — 1 

| See I 
| Notesj 


| RR 


|0p 


Code 
8 


R1 
4 


R2 
4 






| R1,R2 


| All RR instruc- 
tions except 
|SPM and SVC 


IU6, | 
18,9 1 




1 Op 


Code 
g 


R1 
4 


R2 
f4) 






|R1 


|SPM 






|Op 


Code 
8 


I 
8 








|I 


|SVC 




| RX 


1 0 D 


Co de 
8 


R 1 
4 


X2 B2 
4 4 


D2 
12 




|R1, D2 (X2,B2) 
|R 1,S2 (X2) 


| ALL RX 

| instructions 


M-4, | 
17, 9 | 


| RS 


1 0 c 


Code 
8 


R 1 
4 


R3 B2 
4 4 


D2 
12 




|R1,R3,D2 (B2) 
|R1,R3,S2 


| BXH,BXLE,LM, 
| STM 


11-3, 1 
17,8 | 




1 OD 


Co de 
8 


R 1 
4 


R3 B2 
(4)4 


D2 
12 




| R 1 , D2 (B2) 
|R1,S2 


I All shift 

1 instructions 




1 si 


Op 

1 V IT 


Code 
8 


12 
8 


B1 
4 


D1 
12 




|D1 (B1) ,12 
|S1,I2 


1 All ST instruc- 
tions except 
|LPSW r SSM / HIO (f 
| SIO,TIO,TCH,TS 


J 2 . 3. 1 
1 6-8 | 


| 


JOp 


Code 
8 


12 
(8) 


B1 

4 


D1 
12 




| D 1 (B1) 
| S 1 


|LPSW,SSM,HIO, 
| SIO,TIO,TCH,TS 




I ss 


|0p 


Code 
8 


L1 
4 


L2 B1 
4 4 


D1 
12 


B2 
4 


D2|D1 (L1,B1) ,D2(L2,B2) 

|S1 (L1) ,S2(L2) 
12 | 


|PACK,UNPK,MVO, 
| AP,CP,DP,MP,SP, 
|ZAP 


12,3, | 
15,7 | 


L 


|0p 


Code 
8 


L 
8 


B1 
4 


D1 
12 


B2 
4 


D2 |D1 (L,B1) ,D2 (B2) 

| S 1 (L) ,S2 
12| 


|NC,OC,XC,CLC, 
|MVC,MVN,MVZ,TR, 
|TRT,ED,EDMK 
J. 


j 1 
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Notes for Appendix D : 

1. R1 # R2, and R3 are absolute expressions that specify general or floating-point 
registers. The general register numbers are 0 through 15; floating-point register 
numbers are 0 # 2, 4, and 6. 

2. D1 and D2 are absolute expressions that specify displacements. A value of 0 - 4095 
may be specified. 

3. B1 and B2 are absolute expressions that specify base registers. Register numbers 
are 0 - 15. 

4. X2 is an absolute expression that specifies an index register. Register numbers 
are 0 - 15. If B2 is specif ied, X2 must not be omitted; and when indexing is not 
desired, X2 must be specified as 0. 

5. L, L1, and L2 are absolute expressions that specify field lengths. An L expression 
can specify a value of 1 - 256. L1 and L2 expressions can specify a value of 1 - 
16. In all cases, the assembled value will be one less than the specified value. 

6. I and 12 are absolute expressions that provide immediate data. The value of the 
expression may be 0 - 255. 

7. S1 and S2 are absolute or relocatable expressions that specify an address. 

8. RR, RS, and SI instruction fields whose bits are enclosed in parentheses are not 
examined during instruction execution. The fields are not written in the symbolic 
operand, but are assembled as binary zeros. 

9. R1 specifies a 4-bit mask in the BC and BCR machine instructions. 
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APPENDIX E; HEXADEC IMAL-DE CIMAL NUMBER CONVERSION TABLE 



The table in this appendix provides for 
direct conversion of decimal and 
hexadecimal numbers in these ranges: 

He xadecim al Decim al 
— — ■ — ^ — 

000 to FFF 0000 to 4095 

Decimal numbers (0000-4095) are given 
within the 8-part table. The first two 
characters (high-order) of h exadecima l 
numbers (000-FFF) are given in the 
left-hand column of the table, and the 
third character is arranged across the top 
of each part of the table. Thus to find 
the decimal eguivalent of the hex number 
0C9, look for 0C in the left column, and 
across under the column labeled 9. The 
decimal number is 0201. 

To convert from decimal to hexadecimal, 
look up the decimal number within the table 
and read the hexadecimal number by a 
combination of the hex characters to the 
left and above the decimal number. For 



example, decimal number 123 has the hex 
equivalent of 07B, and decimal 1478 has the 
hex equivalent of 5C6. 



For numbers outside the range of the table, 
add the following values to the table 
figures: 



Hexadecimal 


Decimal 


1000 


4096 


2000 


8192 


3000 


12288 


4000 


16384 


5000 


20480 


6000 


24576 


7000 


28672 


8000 


32768 


9 000 


36864 


A000 


40960 


B000 


45056 


cooo 


49152 


D000 


53248 


E000 


57344 


F000 


61440 
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0 123456789ABCDEF 



1 0 0 | 0000 0001 0002 0003 0004 0005 0006 0007 0008 0009 0010 0011 0012 0013 0014 0015 | 

|01 | 0016 0017 0018 0019 0020 0021 0022 0023 0024 0025 0026 0027 0028 0029 0030 0031 | 

|02 | 0032 0033 0034 0035 0036 0037 0038 0039 0040 0041 0042 0043 0044 0045 0046 0047 | 

|03 | 0048 0049 0050 0051 0052 0053 0054 0055 0056 0057 0058 0059 0060 0061 0062 0063 | 

|04 | 0064 0065 C066 0067 0068 0069 0070 0071 0072 0073 0074 0075 0076 0077 0078 0079 | 

|05 | 0080 0081 0082 0083 0C84 0085 0C86 0087 0088 0089 0090 0091 0092 0093 0094 0095 | 

|06 | 0096 0097 0098 0099 0100 0101 0102 0103 0104 0105 0106 0107 0108 0109 0110 0111 | 

|07 | 0112 0113 0114 0115 0116 0117 0118 0119 0120 0121 0122 0123 0124 0125 0126 0127 | 

|08 | 0128 0129 0130 0131 0132 0133 0134 0135 0136 0137 0138 0139 0140 0141 0142 0143 | 

|09 | 0144 0145 0146 0147 0148 0149 0150 0151 0152 0153 0154 0155 0156 0157 0158 0159 | 

|0A | 0160 0161 0162 0163 0164 0165 0166 0167 0168 0169 0170 0171 0172 0173 0174 0175 | 

|0B | 0176 0177 0178 0173 0180 0181 0182 0183 0184 0185 0186 0187 0188 0189 0190 0191 | 

|0C | 0192 0193 0194 0195 0196 0197 0198 0199 0200 0201 0202 0203 0204 0205 0206 0207 | 

|0D | 0208 0209 0210 0211 0212 0213 0214 0215 0216 0217 0218 0219 0220 0221 0222 0223 | 

|0E | 0224 0225 0226 0227 0228 0229 0230 0231 0232 0233 0234 0235 0236 0237 0238 0239 | 

|0F | 0240 0241 0242 0243 0244 0245 0246 0247 0248 0249 0250 0251 0252 0253 0254 0255 | 

1 1 0 | 0256 0257 0258 0259 0260 0261 0262 0263 0264 0265 0266 0267 0268 0269 0270 0271 | 

|11 | 0272 0273 0274 0275 0276 0277 0278 0279 0280 0281 0282 0283 0284 0285 0286 0287 | 

112 | 0288 0289 0290 0291 0292 0293 0294 0295 0296 0297 0298 0299 0300 0301 0302 0303 | 

|13 | 0304 0305 0306 0307 0308 0309 0310 0311 0312 0313 0314 0315 0316 0317 0318 0319 | 

114 | 0320 0321 0322 0323 0324 0325 0326 0327 0328 0329 0330 0331 0332 0333 0334 0335 | 

|15 | 0336 0337 0338 0339 0340 0341 0342 0343 0344 0345 0346 0347 0348 0349 0350 0351 | 

|16 | 0352 0353 0354 0355 0356' 0357 0358 0359 0360 0361 0362 0363 0364 0365 0366 0367 | 

|17 | 0368 0369 0370 0371 0372 0373 0374 0375 0376 0377 0378 0379 0380 0381 0382 0383 | 

|18 | 0384 0385 0386 0387 0388 0389 0390 0391 0392 0393 0394 0395 0396 0397 0398,0399 | 

|19 | 0400 0401 0402 0403 0404 0405 0406 0407 0408 0409 0410 0411 0412 0413 0414 0415 | 

J1A | 0416 0417 0418 0419 0420 0421 0422 0423 0424 0425 0426 0427 0428 0429 0430 0431 I 

|1B | 0432 0433 0434 0435 0436 0437 0438 0439 0440 0441 0442 0443 0444 0445 0446 0447 | 

|1C | 0448 0449 0450 0451 0452 0453 0454 0455 0456 0457 0458 0459 0460 0461 0462 0463 J 

| ID | 0464 0465 0466 0467 0468 0469 -0470 0471 0472 0473 0474 0475 0476 0477 0478 0479 | 

ME | 0480 0481 0482 0483 0484 0485 0486 0487 0488 0489 0490 0491 0492 0493 0494 0495 | 

J IF | 0496 0497 0498 0499 0500 0501 C502 0503 0504 0505 0506 0507 0508 0509 0510 0511 | 

i i ; , , — i 
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I T 1 

||0 1 23 4 5 6 78 9 ABCDEF | 

i — -\ ^ 



20 


05 12 


0513 


0514 


0515 


0516 


0517 


C518 


0519 


0520 


052 1 


0522 


0523 


0524 


0525 


0526 


0527 


21 


0528 


0529 


0530 


0531 


0532 


0533 


0534 


0535 


0536 


0537 


0538 


0539 


0540 


0541 


0542 


0543 


22 


0544 


0545 


0546 


0547 


0548 


0549 


0550 


0551 


0552 


0553 


0554 


0555 


0556 


0557 


0558 


0559 


23 


0560 


0561 


0562 


0563 


0564 


0565 


0566 


0567 


0568 


0569 


0570 


0571 


0572 


0573 


0574 


0575 


24 | 


0576 


0577 


0578 


0579 


0580 


0581 


0582 


0583 


0584 


0585 


0586 


0587 


0588 


0589 


0590 


0591 


25 


0592 


0593 


0594 


0595 


0596 


0597 


0598 


0599 


0600 


060 1 


0602 


0603 


0604 


0605 


0606 


0607 


26 


0608 


0609 


0610 


061 1 


0612 


0613 


0614 


0615 


0616 


0617 


0618 


0619 


0620 


0621 


0622 


0623 


27 | 


0624 


0625 


0626 


0627 


0628 


0629 


0630 


0631 


0632 


0633 


0634 


0635 


0636 


0637 


0638 


0639 


28 


0640 


0641 


0642 


0643 


0644 


0645 


0646 


0647 


0648 


0649 


0650 


0651 


0652 


0653 


0654 


0655 


29 


06 56 


0657 


0658 


0659 


0660 


0661 


0662 


0663 


0664 


0665 


0666 


0667 


0668 


0669 


0670 


0671 


2A 


0672 


0673 


0674 


0675 


0676 


0677 


0678 


0679 


0680 


0681 


0682 


0683 


0684 


0685 


0686 


0687 


2B 


0688 


0689 


0690 


069 1 


0692 


0693 


0694 


0695 


0696 


0697 


0698 


0699 


0700 


0701 


0702 


0703 


2C 


0704 


0705 


0706 


0707 


0708 


0709 


0710 


071 1 


0712 


0713 


0714 


0715 


0716 


0717 


0718 


0719 


2D 


0720 


0721 


0722 


0723 


0724 


0725 


0726 


0727 


0728 


0729 


0730 


0731 


0732 


0733 


0734 


0735 


2E 


0736 


0737 


0738 


0739 


0740 


074 1 


0742 


0743 


0744 


0745 


074 6 


0747 


0748 


0749 


0750 


0751 


2F 


0752 


0753 


0754 


0755 


C756 


0757 


0758 


0759 


0760 


0761 


0762 


0763 


0764 


0765 


0766 


0767 


30 


07 68 


0769 


0770 


0771 


0772 


0773 


0774 


0775 


0776 


0777 


0778 


0779 


0780 


0781 


0782 


0783 


31 


0784 


0785 


C786 


0787 


0788 


0789 


0790 


0791 


0792 


0793 


0794 


0795 


0796 


0797 


0798 


0799 


32 


0800 


0801 


0802 


0803 


0804 


0805 


0806 


0807 


0808 


0809 


0810 


081 1 


0812 


0813 


0814 


0815 


33 


08 16 


0817 


0818 


0819 


0820 


0821 


0822 


0823 


0824 


0825 


0826 


0827 


0828 


0829 


0830 


0831 


34 


0832 


0833 


0834 


0835 


0836 


0837 


0838 


0839 


0840 


0841 


0842 


0843 


0844 


0845 


0846 


0847 


35 


0848 


0849 


0850 


0851 


0852 


0853 


0854 


0855 


0856 


0857 


0858 


0859 


0860 


0861 


0862 


0863 


36 


0864 


0865 


0866 


0867 


0868 


0869 


0870 


0871 


0872 


0873 


0874 


0875 


08 76 


0877 


0878 


0879 


37 


0880 


0881 


0882 


0883 


0884 


0885 


0886 


0887 


0888 


0889 


0890 


089 1 


0892 


0893 


0894 


0895 


38 


0896 


0897 


0898 


0899 


0900 


0901 


0902 


0903 


0904 


0905 


0906 


0907 


0908 


0909 


0910 


0911 


39 


0912 


0913 


0914 


0915 


0916 


0917 


0918 


0919 


0920 


0921 


0922 


0923 


0924 


0925 


0926 


0927 


3A 


0928 


0929 


0930 


0931 


0932 


0933 


0934 


0935 


0936 


0937 


0938 


0939 


0940 


0941 


0942 


0943 


3B 


0944 


0945 


0946 


0947 


0948 


0949 


0950 


0951 


0952 


0953 


0954 


0955 


0956 


0957 


0958 


0959 


3C 


0960 


0961 


0962 


0963 


0964 


0965 


0966 


0967 


0968 


0969 


0970 


0971 


0972 


0973 


0974 


0975 


3D 


09 76 


0977 


0978 


0979 


0980 


0981 


0982 


0983 


0984 


0985 


0986 


0987 


0988 


0989 


0990 


0991 


3E 


09 92 


0993 


0994 


0995 


C996 


0997 


0998 


0999 


1000 


1001 


1002 


1003 


1004 


1005 


1006 


1007 


3F 


1008 


1009 


1010 


101 1 


1012 


1013 


1014 


1015 


1016 


1017 


1018 


1019 


1020 


1021 


1022 


1023 



U J , 1 
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n 


1 
i 


Z 


■3 
J 


4 


D 


c. 

0 


7 

1 


Q 
O 


Oj 


A 


D 




JJ 


Hi 


r 


40 i 
41 
42 
n 3 

4 O 


1024 
1040 
1056 

1 U / Z 


1025 
104 1 
1057 

1 07 3 


1026 
1042 
1058 
i 07/i 


1027 
1043 
1059 

1 076 


1028 
1044 
1060 

1 076 


1029 
1045 
1061 

1 077 


1030 
1046 
1062 

1 0 7P 


1031 
1047 
1063 

1 07 Q 


1032 
1048 
1064 

1 0 AO 


1033 
1049 
1065 

1 OP 1 


1034 
1050 
1066 

1 OP 9 
I UO Z 


1035 
105 1 
1067 

1 OP 3 


1036 

1052 

1068 
inpu 

i U O 4 


1037 
1053 
1069 

1 OP 6 
I UOj 


1038 
1054 
1070 

1 0P6 
I UOO 


1039 
1055 
1071 

1 0R7 


44 | 

45 

46 

/l7 
4 1 


1088 
1 104 

I 120 

I I 36 

J I JO 


1 08 9 
1 105 
1 121 

I I J / 


1090 
1106 
1 122 

1 1 3Q 
I I JO 


1091 
1 107 
1 123 


1092 
1108 
1 124 

1 1 ZlO 
I l 4U 


1093 
1 109 
1 125 
11/11 

I 1 4 I 


1094 
1 1 10 
1126 

1 1 ll 0 
I I 4Z 


1095 
1111 
1127 

1 1 4 J 


1096 
11.12 
1128 
11/1/1 

J 1 4 4 


1097 
1113 
1 129 

1 111 c 

114 3 


1098 
1114 
1 130 

I 1 4 D 


1099 
1115 
1 131 

1 1 /l "7 
I J 4 / 


1 100 
11 16 
1132 

1 1 HQ 
I I 40 


1101 
11 17 
1 133 

1 1 /lO 

i 1 4y 


1102 
1118 
1 134 

1 1 £0 


1 103 
1119 
1 135 

1 1 CI 

113 1 


48 
49 
4A | 

*t D 


1152 
1 168 
1184 
1 9 oo 


1 153 
1 169 
1 185 

190 1 


1 154 
1 170 
1186 

190 9 


1 155 
1 171 
1 187 

190 3 


1156 
1172 
1188 


1 157 
1 173 
1 189 

190 6 


1 158 
1 174 
1190 

19 06 
I z uo 


1159 
1175 
1191 

1 907 

I Z U / 


1160 
1 176 
1192 

1 9 OP 


1161 
1177 

1 193 

1 90 Q 


1 162 
1 178 
1 194 


1 163 
1 179 
1 195 

1911 
i Z 1 1 


1164 
1 180 
1196 

19 19 

1 Z I z 


1165 
1181 
1 197 

19 13 

i Z i -J 


1166 
1182 
1198 

19 1/1 
1 Z 1 4 


1 167 
1 183 
1 199 

19 16 
I Z I D 


4C 
4D 
4E 


12 16 
1232 
1248 

19 6/1 

IZU4 


1217 
1233 
1249 

1 96 6 


1218 
1234 
12 50 

1 966 


1219 
1235 
1251 

196 7 
1 zu # 


1220 
1236 
1252 
1 96R 


1221 
1237 
1253 

1 96Q 


1222 
1238 
1254 

1 970 

I z / u 


1223 
1239 
1255 

197 1 

1 Z / 1 


1224 
1240 
1256 

19 79 
I z / z 


1225 
1241 
1257 

1 97 3 
i z / o 


1226 
1242 
1258 

1 97/1 

1^/4 


1227 
1243 
1259 

1976 

1 Z / D 


1228 
1244 
1260 

1 9 76 

1 Z / D 


1229 
1245 
1261 

1 9 77 

I z / / 


1230 
1246 
1262 

197P 
7 z / o 


1231 
1247 
1263 

1 97Q 

I Z / -7 


50 | 
51 
52 
53 


1280 
1296 
1312 
1328 


1281 
1297 
1313 
1329 


1282 
1298 
1314 
1330 


1283 
1299 
1315 
1331 


1284 
1300 
1316 
1332 


1285 
1301 
1317 
1333 


1286 
1302 
1318 
1334 


1287 
1303 
1319 
1335 


1288 
1304 
1320 
1336 


1289 
1305 
1321 
1337 


1290 
1306 
1322 
1338 


1291 
1307 
1323 
1339 


1292 
1308 
1324 
1340 


1293 
1309 
1325 
1341 


1294 
1310 
1326 
1342 


1295 
1311 
1327 
1343 


54 
55 
56 
57 


1344 
1360 
1376 
1392 


1345 
1361 
1377 
1393 


1346 
1362 
1378 
1394 


1347 
1363 
1379 
1395 


1348 
1364 
1380 
1396 


1349 
1365 
1381 
1397 


1350 
1366 
1382 
1398 


1351 
1367 
1383 
1399 


1352 
1368 
1384 
1400 


1353 
1369 
1385 
1401 


1354 
1370 
1386 
1402 


1355 
1371 
1387 
1403 


1356 
1372 
1388 
1404 


1357 
1373 
1389 
1405 


1358 
1374 
1390 
1406 


1359 
1375 
1391 
1407 


58 | 
59 

5A | 

5B 


1408 
1424 
1440 
1456 


1409 
1425 
1441 
1457 


1410 

1426 
1442 
1458 


1411 

1427 
1443 
1459 


1412 
1428 
1444 
1460 


1413 
1429 
1445 
1461 


1414 

1430 
1446 
1462 


1415 
1431 
1447 
1463 


1416 
1432 
1448 
1464 


1417 
1433 
1449 
1465 


1418 
1434 
1450 
1466 


1419 
1435 
145 1 
1467 


1420 
1436 
1452 
1468 


1421 
1437 
1453 
1469 


1422 
1438 
1454 
1470 


1423 
1439 
1455 
1471 


5C 
5D 
5E 
5F 


1472 
1488' 
1504 
1520 


1473 
1489 
1505 
1521 


1474 
1490 
1506 
1522 


1475 
1491 
1507 
1523 


1476 
1492 
1508 
1524 


1477 
1493 
1509 
1525 


1478 
1494 
1510 
1526 


1479 
1495 
1511 
1527 


1480 
1496 
1512 
1528 


1481 
1497 
1513 
1529 


1482 
1498 
1514 
1530 


1483 
1499 
1515 
1531 


14 84 
1500 
1516 
1532 


1485 
1501 
1517 
1533 


1486 
1502 
1518 
1534 


1487 
1503 
1519 
1535 



I I J 
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0 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


60 

61 1 

62 
63 


1536 
1552 
1568 
1584 


1537 
1553 
156 9 
1585 


1538 
1554 
1570 
1586 


1539 
1555 
1571 
1587 


1540 
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|A0 | 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575 

| A 1 | 2576 2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591 

|A2 | 25'92 2593 2594 2595 2596 2597 2598 2599 2600 2601 2602 2603 2604 2605 2606 2607 

|A3 2608 2609 2610 2611 2612 2613 2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 

|A4 | 2624 2625 2626 2627 2628 2629 2630 2631 2632 2633 2634 2635 2636 2637 2638 2639 

|A5 | 2640 2641 2642 2643 2644 2645 2646 2647 2648 2649 2650 2651 2652 2653 2654 2655 

|A6 | 2656 2657 2658 2659 2660 2661 2662 2663 2664 2665 2666 2667 2668 2669 2670 2671 

|A7 | 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 

|A8 | 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 

|A9 | 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 

| AA | 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 

| AB | 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747 2748 2749 2750 2751 

|AC | 2752 2753 2754 2755 2756 2757 2758 2759 2760 2761 2762 2763 2764 2765 2766 2767 

| AD | 2768 2769 2770 2771 2772 2773 2774 2775 2776 2777 2778 2779 2780 2781 2782 2783 

| AE | 2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794 2795 2796 2797 2798 2799 

| AF | 2800 2801 2802 2803 2804 2805 2806 2807 2808 2809 2810 2811 2812 2813 2814 2815 

|B0 | 2816 2817 2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 

|B 1 | 2832 2833 2834 2835 2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 

|B2 | 2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 2862 2863 

|B3 | 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878 2879 

|B4 | 2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890 2891 2892 2893 2894 2895 

JB5 | 2896 2897 2898 2899 2900 2901 2902 2903 2904 2905 2906 2907 2908 2909 2910 2911 

|B6 | 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926 2927 

|B7 | 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937 2938 2939 2940 2941 2942 2943 

|B8 | 2944 2945 2946 2947 2948 2949 2950 2951 2952 2953 2954 2955 2956 2957 2958 2959 

|B9 | 2960 2961 2962 2963 2964 2965 2966 2967 2968 2969 2970 2971 2972 2973 2974 2975 

|BA | 2976 2977 2'978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 

|BB | 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 

|BC | 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 

JBD | 3024 3025 3026 3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037 3038 3039 

(BE | 3040 3041 3042 3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 

|BF | 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 
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3963 


3964 


3965 


3966 


3967 


F8 


39 68 


3969 


3970 


3971 


3972 


3973 


3974 


3975 


3976 


3977 


3978 


3979 


3980 


3981 
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APPENDIX F: SU MMARY OF-CONSTANTS 













NUMBER 














| LENGTH 


j 


OF CON- 






TRUN- | 




| IMPLIED 




| MODI- 


1 


STANTS 


RANGE 


RANGE | 


CATION/ | 




| LENGTH 


ALIGN- 


1 FIER 


SPECIFIED | 


PER 


FOR EX- 


FOR | 


PADDING | 


| TYPE 


1 (BYTES) 


MENT 


1 RANGE 


BY j 


OPERAND 


PONENTS 


SCALE | 


SIDE | 


1 c 


| as 


byte 


| 1 to 


characters j 


one 






right | 




| needed 




| 256 


• 










1 x 


1 as 


byte 


| 1 to 


hexadecimal j 


one 






left 




| needed 
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digits | 










1 B 


j as 


byte 


| 1 to 


binary | 


one 






left i 




1 needed 
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digits | 










1 F 


1 4 


word 


| 1 to 


decimal | 


multi- 


-85 to 


-187 to| 


left | 








1 8 


digits | 


ple 


+ 75 


+346 | 




1 H 


1 2 
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1 1 to 


decimal | 


multi- 


-85 to 


-187 to | 


left | 






word 


I 8 


digits | 


ple 


+ 75 


+ 346 | 






j 




-j I 


J 






I 0-13 | 




1 E 


1 4 


word 


| 1 to 
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-85 to 




right | 




j 




I 8 


digits | 


ple 


+ 75 






1 D 


1 8 


I double 


| 1 to 
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-85 to 
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right i 




J 
I 


word 


I 8 


digits | 
1 


ple 
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i p *) 


| as 


byte 


| 1 to 
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left 




| needed 




i 16 


digits j 


ple 








1 z *) 


| as 


byte 


| 1 to 
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left 




j needed 




I 16 


digits | 


ple 








1 A 


1 4 
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| 1 to 


any | 


one 






left 








I 4 


expression | 










1 v 


1 4 


| word 


| 3 or 


relocatable | 


one 






left 








I 4 
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1 s 


1 2 


half 


| 2 only 


one absolute | 


one 












| word 




or relocatab- | 


















| J.e expression | 


















[ or two absol- j 


















ute express- j 


















| ions: j 


















; exp(exp) | 










1 Y 


1 2 


I half 


| 1 to 


any | 


one 






left 






| word 


I 4 


| expression | 










l _ 


. L 


i 


i 


L J 




i 


i i 


■ 



*) Length modifier range in DS from 1 to 256. 
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APPENDIX G : I PGS E X AMPL E 



This example (Figure 53) illustrates the 
files and main-storage area assignments for 
one tape file, one card file, and one disk 
file. It is a simplified order and 
inventory job in which a master tape is 
updated and written onto a disk file, and a 
card file of detail orders is processed. 
The following assumptions are made. 

• The old master inventory tape contains 
guantity on hand and unit price in 
addition to the identifying 
information. 

• The card file reflects guantities 
ordered. It is to be completed with 
guantity available for shipment, unit 
price, and the extension of guantity 
shipped x unit price. 

• The new master inventory disk file 
reflects the decrease in gpantity on 
hand due to the current orders, or an 
increase when items are returned. 



The illustration shows this setup: 

1. Job Control cards to assign devices for 
assembly. It is assumed that a 
Supervisor for object program execution 
is assembled separately. 

2. Declarative macro instructions to 
define the three files. The first 
definition is preceded by a 
begin-def inition card. 

a. Old master tape file. This is an 
input file to be read forward. It 
contains standard volume and file 
labels and additional user 
80-character file labels. It is a 
card-image file with a blocking 
factor of 5, and uses two input 
areas with general purpose register 
3 assigned for lopating individual 
records in the input areas. 

b. New master disk file. This is a 
disk output file with the same 
characteristics as the tape input 
file. General purpose register 4 
is assigned for locating the next 
available output-record area. 

c. Detail card file. This is an input 
file to be updated. It is read at 
the punch-feed-read station of an 
IBM 2540 Card Read-Punch. Records 



are read in, updated, and punched 
from the same I/O area. 

d. End of the three file definition 
macro instructions. The user's 
source program follows this macro 
instruction. 

3. Assembler instructions to define the 
input and output areas for the three 
files. 

a. Two input and two output areas are 

reserved for the master files. 
Input records, and fields within 
the records, are defined in a 
dummy section (DSECT) . See part 
3c. 

b. One I/O area is reserved for detail 

card records. Because these are 
single unblocked records, the 
individual fields within the 
records may be defined along with 
the allocation of the I/O area as 
shown. Note the use of the 
zero-duplication factor. 

c. Use of the DSECT (dummy section) 

assembler instruction is 
illustrated here. This permits 
the individual fields within a 
record to be addressed 
symbolically. Whenever these 
fields are used as an operand of 
an instruction, their length may 
be implied and their location is 
expressed as a displacement 
relative to the contents of the 
register specified for addressing 
the dummy section. In this 
example, register 3 is assigned to 
the master input file hy DTFSR 
entry IOREG. Therefore, IOCS 
makes the starting address of the 
current record available to the 
problem program in register 3. 
Because this register is also used 
to address the dummy section 
(USING statement in section 6) , 
individual fields can be addressed 
regardless of which record in the 
input area (s) is being processed. 

4. Assembler instruction to resume coding 
of original control section. Because 
the DSECT coding interrupted the 
control section defined by the START 
instruction, a CSECT instruction is 
reguired to resume the coding of the 
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original control section. The user may 
include here the remainder of his 
storage assignment instructions and any 
constants, tables, or work areas for 
calculations. 

5. User routines reguired for processing 
additional user-standard labels. 

6. Sample instructions to open files and 
locate master records that have current 
activity. This illustrates the 
following: 

• All files to be processed by 

logical IOCS must be opened. 

• A GET for an unblocked record to be 

processed in a single I/O area 
causes the record to be physically 
transferred from the I/O device to 
main storage . This makes it 
available to the problem program. 

• The first GET for a record in a 

blocked file causes the physical 
transfer of the block (s) of data 
from the I/O device to the I/O 
area(s). It also initializes the 
specified I/O register with the 
address of the first record. Each 
succeeding GET causes the address 
of the currently available record 
to be placed in the I/O register, 
and may or may not cause a 
physical transfer of data. 



When output files (with labels) 
specify an I/O register, the 
register is initialized by the 
OPEN routine (after label 
processing) . A PUT to an output 
file with no work area specified 
merely causes the address of the 
next available record area to be 
placed in the specified I/O 
register. No data is moved within 
storage, and physical transfer of 
data may or may not occur. 



A dummy section is addressed by 
means of the USING statement, and 
fields (for example, MITEM) within 
an individual record that have 
been defined in the dummy section 
may be referred to by symbolic 
names. 



A record can be moved from an input 
file to an output file, both of 
which have I/O registers 
specified, by the MVC instruction 
with explicit length and explicit 
base registers. These base 
registers must be the same 
registers as those specified by 
the IOBEG entries in the 
corresponding file definitions. 

All files that have been opened 
must be closed. 
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Figure 53. IOCS Example (Part 1 of 6) 
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1 X | 
• ■ 



(Continued) 

I 
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Appendix H: Assembler Languages — Features Comparison 


Chart (Continued) 




! ... 

j Feature 
j 


1 l 

| BPS/3 60: | 
|Card Basic | 
| Assembler | 


7090/7094 | 
Support | BPS/360 and 
Package JBOS/360 
Assembler (Assemblers 1 


■ i 

IOS/360 | 


| Bit length specifications 


j - I 






1 Y 1 


j Scale modifier 




1 


X 


1 X | 


j Exponent Modifier 


! - I 




X 


1 Y 1 
1 A J 


j DC types 


| Except | 
1 B, P, Z, | 
1 V, Y, S | 


Except | 
B, V 


X 


1 Y 1 
i A | 


| DC duplication factor 


j Except j 
1 A | 


X , 


Except 
S 


1 X | 


j DC duplication factor of zero 


! i 


— 


Except 
S 


1 X | 


j DC length modifier 


J Except j 
1 H, Ev D | 


X 


X 


1 X | 


| DS types 


| Only C, | 
1 H, F, D | 


Only C, 
H, F, D 


X 


1 Y 1 


| DS length modifier 


I Only C | 


Only C 


X 


1 Y 1 
1 A 1 


I DS maximum length modifier 


| 256 | 


256 


256 


| D D i JJ D 1 


| DS constant subfield permitted 


"1 — ~ — !~ 


— 


X 


1 Y 1 
1 A 1 


| COPY 


~l " 1" 


— 


— — 


1 Y 1 


| CSECT 


"J ~ [ 


— 


X 


1 Y 1 


| DSECT 


"1 " 1" 




X 


1 Y 1 


| ISEQ 


"1 " 1" 


— 


X 


1 Y 1 


| LTORG 


~l " f" 




X 


1 Y 1 


| PRINT 


! — i 




X 


1 Y 1 


| TITLE 




X 


X 


1 X | 


| COM 




— 


— 


1 Y 1 
| A | 


| ICTL 
1 


| 1 oprnd | 
| 1 or 25 | 
I only j 


1 oprnd 


X 


1 X | 


| USING 


j 2 oprnds j 
| oprnd 1 | 
| reloc | 
| only | 


2-17 oprnds 
oprnd 1 
reloc 
only 


6 oprnds 


1 X | 


| DROP 

L 


I 1 oprnd | 
I only j 
• • 


X 


5 oprnds 


1 X | 

JL j 



(Continued) 



Appendix H 231 



Appendix H: Assembler Languages — Features Comparison Chart (Continued) 





r 

|Card Basic 
j Assembler 


| 7 090/7094 

| Package 
j Assembler 


| Dro/ jou a. ii u 

| BOS/360 

j Assemblers 1 


T — 1 

IOS/360 | 
| Assembler | 


| CCW 


| oprnd 2 
j reloc 
| only 


1 x 


1 x 


1 X | 


| ORG 

L 


I no blank 
I oprnd 


| no blank 
| oprnd 


1 x 


1 x | 


I - - — - " 

| ENTRY 

u «_ ,. 


j 1 oprnd 
I only 


j 1 oprnd 
I only 


j 1 oprnd 
j only 


1 X | 


1 "■ 1 

1 JjA inn 


| max 14 

1 1 nnrnrl 

1 only 


| ! <-> p L li U 

j only 


1 1 on t** n 

| only 


1 Y 1 


I 

| CNOP 


1 9 c\ of 

| digits 


1 9 r\ or 

| digits 


| digits 


1 x | 


| PUNCH 






1 x 


1 x | 


| REPRO 




-+ 


1 x 

-+ 


1 x | 


| Macro Instructions 


+ 

1 

... X 


1 

. i... 


1 x 

X 


1 X | 



1 Not including Model 20. 

(Continued) 
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Appendix Hi Assembler Languages — Features Comparison Chart 


(Continued) 




i ... 

j Macro Lanquage Features 


i 

1 BPS/JbU and 

J BOS/360 

| Assemblers 1 


r \ 

IOS/360 | 
| Assembler | 


1 up erauQ oudiisis 




1 V 1 


| Attributes of macro-instruction operands inside macro 

| definitions and symbols used in conditional assembly 

| instructions outside macro definitions, 
i 


" \~ - 

1 


1 X | 


J- 

(Substitution in the operation field 

1- 


\ 


j X | 


(Subscripted SET symbols 
i 


- T' ~-~ 


1 X | 

1 I 


1 : 

| Maximum number of operands 


| U9 


+ — 1 

I 200 | 


| Conditional assembly instructions outside macro 
| definitions. 




1 X | 


j Maximum number of SET symbcls | j | 


| global SETA 


1 16 


| 2 ! 


| global SETB 


| 128 


1 2 1 


| global SETC 


I 16 


1 2 1 


| local SETA 


I 16 


1 2 ! 


| local SETB 


+ 

| 128 


1 2 1 


| local SETC 


I o 

i, , , 


1 2 1 
i i 



1 Not including Model 20. 

2 The number of SET symbols permitted by the Operating System/360 Assembler 
is variable, dependent upon available main storage. 
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APPENDIX I: SUMMARY OF INPUT/OUTPUT FOE AN ASSEMBIY 



1 - - - - — - 1 

| This table lists the card groups that make up the source deck produced by the | 
| programmer, with an explanation of each group. The groups are listed in the order in | 
| which they appear in the source deck. I 
i Note; All job-control cards must enter the system via SYSRDR, all others via SYSIPT. | 
| The same device may be assigned to both SYSRDR and SYSIPT. | 


| CARD GROUP 


CONTENTS | 


REMARKS | 


|Job Control Cards 


// JOB ASSEMBLER | 


First card in group (always required) | 
Assemble-and-execute is initiated when name of | 
problem program appears as the second operand.) | 




// DATE | 


Required on first job after IPL. | 




// ASSGN | 


See Figure 50 for device assignments. (Only | 
those assignments not already in effect are | 
required.) j 




// VOL | 
// DLAB | 
// XTENT | 


Required for SYS000 (all assemblies) . | 
See Fiqure 56 for operands. | 




// VOL | 
// DLAB | 
// XTENT | 
// EXEC j 


nequirea rot oibuu i (wnen tne | 
AWORK 2 option is used) . | 

Last card in group (always reguired) . | 


| Assembler 

j Control Cards 


ALOG | 
AOPTN | 

AWORK | 
AFILE | 


See Control Cards section for 1 
explanation and format. These cards may appear | 
in any order. | 


| Supervisor- 

| Assembly 

| Source Cards 


Supervisor- | 
assembly | 
macro statements, j 


Either a BOS or an | 
independent Supervisor may be assembled. | 


| Problem- Program 
| Source Cards 


Assembler, | 
Machine, and | 
Macro statements. | 


START card may be omitted if a problem program | 
is assembled alone, (START 0 assumed) . START | 
card must be omitted if a problem program and a | 
supervisor are assembled together. | 


| End Card | END I 

L J. .. _ t_ 


Last card of source deck. | 



Figure 54. Assembler Source Deck 
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Symbolic | 

Unit | Function and Device 



REQUIRED DEVICE ASSIGNMENTS 



SYSRES 



System residence device. 
IBM 2311 DisJc Storage Drive. 



SYSRDR 



Job-control input device. May be the same device as SYSIPT. 
±BM 1442, 2520, or 2540 Card Read Punch, or 2501 Card Reader. 



SYSIPT 



Source program input device. May be the same device as SYSRDR, 
IBM 1442, 2520 (Model A1 or B1), or 2540 Card Read Punch, or 
2501 Card Reader. IBM 2400-series Magnetic Tape Unit (7- or 
9-track) may be used. (If the data-conversion feature was used 
to prepare the 7-track tape, it must also be used to read the 
tape.) Information appearing on tape must be 80-byte unblocked 
records. 



SYSLST 



Program listing device. 

IBM 1403, 1404 (continuous forms only), or 1443 Printer. 

IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with or 

without the data-conversion feature) may be used. 

Listing on tape appears as 121-character print images (a single 

forms-control byte followed by a 1 20-character line image) . 

(This forms-control byte is the command code portion of the CCW 

used during printout.) 



SYS000 



Used for temporary work area during assembly. 
IBM 2311 Disk storage Drive. 
J.May be same device as SYSRES. 



OPTIONAL DEVICE ASSIGNMENTS 



SYSLOG | Operator message logging device. 

| IBM 1052 Printer-Keyboard, or IBM 1403, 1404 (continuous forms 
| only) , or 1443 Printer.. 



SYSOPT JObject program output device. 

| IBM 1442, 2520, or 2540 Card Read Punch. 

| IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with 

| data-conversion feature) may be used. 

| Output on tape appears as 80-byte unblocked records. 

J Not reguired when using assemble-and-execute option. 



SYS001 | Used for temporary work area during assembly. 
|IBM 2311 Disk Storage Drive. 

j Reduces assembly time by providing additional work area on a 
| separate disk drive. 



N ote 1 : When an IBM 2404 Magnetic Tape Unit and Control is used, all tape drives 
must be assigned to the same channel. 

Not e 2 : For any of the above device assignments, the Supervisor must contain the 
corresponding error routines. 



Figure 55. Device Assignments 
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r — — 

jSymbolic 
|Unit 


I 

| Function and Device 




| REQUIRED DEVICE ASSIGNMENTS i 


ISYSRES 


■ 

| System residence device. 

I IBM 2311 Dis-k Storage Drive. 




| SYSRDR 


| Job-control input device. May be the same device as SYSIPT. 
| tBM 1442, 2520, or 2540 Card Read Punch, or 2501 Card Reader. 




ISYSIPT 


J Source program input device. May be the same device as SYSRDR, 
|IBM 1442, 2520 (Model A1 or B1), or 2540 Card Read Punch, or 
|2501 Card Reader. IBM 2400-series Magnetic Tape Unit (7- or 
| 9-track) may be used. (If the data-conversion feature was used 
| to prepare the 7-track tape, it must also be used to read the 
| tape.) Information appearing on tape must be 80-byte unblocked 
| records. 




ISYSLST 


IProgram listing device. 

| IBM 1403, 1404 (continuous forms only), or 1443 Printer. 

| IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with or 

| without the data-conversion feature) may be used. 

| Listing on tape appears as 121-character print images (a single 

| forms-control byte followed by a 120-character line image). 

| (This forms-control byte is the command code portion of the CCW 

| used during printout.) 




ISYS000 


| Used for temporary work area during assembly. 
| IBM 2311 Disk Storage Drive. 
J.May be same device as SYSRES. 




| OPTIONAL DEVICE ASSIGNMENTS I 


ISYSLOG 


r 

| Operator message logging device. 

| IBM 1052 Printer-Keyboard, or IBM 1403, 1404 (continuous forms 
| only) , or 1443 Printer. 




| SYS OPT 


— 1- : ■ 

JObject program output device. 

|IBM 1442, 2520, or 2540 Card Read Punch. 

| TBM 2400-series Magnetic Tape Unit (9-track, or 7-track with 

| data-conversion feature) may be used. 

| Output on tape appears as 80-byte unblocked records. 

| Not required when using assemble-and-execute option. 




ISYS001 

L 


— 1 : 

| Used for temporary work area during assembly. 
|IBM 2311 Disk Storage Drive. 

| Reduces assembly time by providing additional work area on a 
| separate disk drive. 


J 
l 



Note 1 : When an IBM 2404 Magnetic Tape Unit and Control is used, all tape drives 
must be assigned to the same channel. 

Not e 2 ; For any of the above device assignments, the Supervisor must contain the 
corresponding error routines. 



Figure 55. Device Assignments 
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This table lists the Disk-label cards, and their contents. 



Card | Field 
i 



| Contents 



Required for all assemblies 



VOL 



DLAB 



XTENT 



Symbolic Unit 
File Name 

File Name 
Format Identifier 
File Serial Number 
Volume Sequence Number 
Creation Date 
Expiration Date 
System Code 

Extent Type 

Extent Sequence Number 
Lower Limit of Extent 
Upper Limit of Extent 
Volume Serial Number 
Symbolic Unit 



SYS000 
WORK 1 

BOS 8K DISK WORK FILE 1 
1 

Required 
0001 

Today's Date 
Today's Date 
Optional 

1 

000 

(Define the area, on the disk pack assiqned 
to SYS000, to be used by the assembler) . 
Must be the same as DLAB File Serial Number, 
SYS000 



Required only when the AWORK 2 option is used. 



VOL 



DLAB 



XTENT 



Symbolic Unit 
File Name 

File Name 
Format Identifier 
File Serial Number 
Volume Sequence Number 
Creation Date 
Expiration Date 
System Code 

Extent Type 

Extent Sequence Number 
Lower Limit of Extent 
Upper Limit of Extent 
Volume Serial Number 
Symbolic Unit 



SYS001 
WORK 2 

BOS 8K DISK WORK FILE 2 
1 

Required 
0001 

Today's Date 
Today's Date 
Optional 

1 

000 

(Define the area, on the disk pack assiqned 
to SYS001, to be used by the assembler). 
Must be same as DLAB File Serial Number. 
SYS001 



Fiqure 56. Disk Label Cards 
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1 1 

| This table lists the card groups that make up the output deck produced | 
| by the assembler, and the conditions of their assembly. The groups are | 
| listed in the order in which they appear in the output deck. | 
I Note: No output deck will be produced when NODECK appears in AOPTN. I 


I Card Group 




i ■ , 
I Remarks I 








| J.r Jj LUqUcL 




1 U o cU JL Ui. XUaUlliy d 11 lllUc {Jell Lit; 11 U oUpcL VlbUJ. 1LU1H d LaLU | 

| reader. Produced when IPL appears in AOPTN. | 






1 Vi t~s c- /^t 1" <d T"* f\ n f~* t\ f~* 3 y c* o c? 11 1 + ft* Am D T7DT3H T3 TI M/*" 1 W % 

I lntbe Lc^ruuin-cu oaias icsuxi. j_i.uiii nrirxtu or rum-n | 
(instructions located before START. | 


| Symbol Table 




| Produced when PCHSYM appears in AOPTN. | 


| External Symbol 
1 Dictionary ihodj 




| Not produced when NOESD appears in AOPTN. | 


| Supervisor 




| Either a BOS or an independent supervisor may be | 

| (Jl-OUUtcU^ | 


| Program Loader 




| Produced as part of the independent supervisor. | 


| Problem Program 




[Consists of TXT, XFR, and reproduced cards. The | 
(reproduced cards result from REPRO or PUNCH j 


| Relocation Dictionary 


(RLD) | Produced if relocatable constants are present, except j 
| when NORLD appears in AOPTN. | 


1 End Card 




| Produced as the last card of the output deck. (Next | 
| to last if an Entry card is produced.) | 


| Entry Card 
■ 




(Produced as the last card of the output deck when ( 
| ENTRY appears in AOPTN. | 
• ... ._ .. ,._ . . j 



Figure 57. Assembler Output Deck 
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The information in each card is in 
EBCDIC— Extended Binary Coded Decimal 
Interchange Code. 



For each card, the first column indicates 
the numbers of the columns to be punched. 
The second column indicates the information 
to be punched. 



f ESD Card 



2-4 



1 1-12 



15-16 



17-72 



73-76 



Multiple punch (12-2-9). 
Identifies this as a loader card. 



ESD — External Symbol Dictionary 
card. 



Number of bytes of information 
contained in this card. 



External symbol identification 
number (ESID) of the first SD, PC, 
or EE on this card. Relates the 
SD, PC r or ER to a particular 
control section. 



Variable information. 

8 positions. Name. 

1 position. Type code: 0=SD, 
1=LD, 2=ER, or 4 = PC. 

3 positions. Assembled origin. 

1 position. Blank. 

3 positions. Control section 
length, if an SD-type or a PC-type. 
If an LD-type, this field contains 
the external symbol identification 
number (ESID) of the SD or PC 
containing the label. 



Program identification taken from 
the name field of the first TITLE 
statement before the START card. 



77-80 | Seguence number starting with 0001. | 
i . , i 



TXT Card 



2-4 



6-8 



1 1-12 



15-16 



17-72 



73-76 



Multiple punch (12-2-9) . 
Identifies this as a loader card, 



TXT — Text card. 



Assembled origin (address of first 
byte to be loaded from this card). 



Number of bytes of text to be 
loaded. 



External symbol identification 
number (ESID) of the control 
section (SD) containing the text, 



Op to 56 bytes of text — data or 
instructions to be loaded. 



Program identification taken from 
the name field of the first TITLE 
statement before the START card. 



77-80| Seguence number starting with 0001. 



RLD Card 



2-4 



1 1-12 



17-72 



73-76 



77-80 



Multiple punch (12-2-9). 



RLD — Relocation Dictionary card. 



Number of bytes of information 
contained in the card. 



Variable information (multiple 
items) . 

2 positions. Pointer to the 
relocation factor of the 
contents of the load constant. 

2 positions. Pointer to the 
relocation factor of the control 
sections in which the load 
constant occurs. 

1 position. Flag indicating type 
of constant. 

3 positions. Assembled address 
of load constant. 



Program identification taken from 
the name field of the first TITLE 
statement before the START card. 



; , ^ 

Sequence number starting with 0001. | 



Figure 58. Format of Assembler Output Cards (Part 1 of 2) 
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END Card 



2-4 



6-8 



15-16 



17-22 



73-76 



77-80 



Multiple punch (12-2-9) . 



END 



Assembled origin of the label 
supplied to the Assembler in the 
END card (optional) . 



ESID number of the control section 
to which this END card refers. 



Symbolic label supplied to the 
Assembler if this label was not 
defined within the assembly. 



Proqram identification taken from 
the name field of the first TITLE 
statement before the START card. 



Sequence number starting with 0001. 



XFR Card 



2-4 



6-8 



15-16 



17-22 



73-76 



Multiple punch (12-2-9). 



XFR. Transfer card. 



Assembled origin of entry point 
(after the program is loaded, it 
receives control at this point) . 



External symbol identification 
number (ESID) of the control 
section in which the transfer 
occurs. 



Symbolic label of the entry point. 



Program identification taken from 
the name field of the first TITLE 
statement before the START card. 



77-80 | Seguence number starting with 0001. 
i '. i 



SYM Card 
1 



2-4 



11-12 



14-16 



17-72 



73-76 



Multiple punch (12-2-9) 



SYM 



Number of bytes of information 
contained in this card. 



External symbol identification 
number (ESID) of the control 
section (SD) containing the text. 



Variable information. 
12 columns 

8 ppsitions - symbol name. 
1 position - type identification 
(machine or assembler instruc- 
tion other than EQU, DC, or DS) . 
3 positions - Value attribute 
(the displacement within 
the CSECT) . 



or 



17 columns 

8 positions - symbol. 

1 position - type identification 

(EQU, DC, or DS) . 
3 positions - Value attribute 
(the displacement within 
the CSECT) . 

1 position - constant type. 
1 position - length (one byte 

less than the constant) . 
3 positions - multiplicity. 



Program identification taken from 
the name field of the first TITLE 
statement preceding the START card, 



77-80 | Seguence number starting with 0001. | 
i 1 1 



Figure 58. Format of Assembler Output Cards (Part 2 of 2) 
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I Field 
I 



| Print | Meaning 
J Positions | 
.j j 



External Symbol Dictionary (ESD) 



| SYMBOL 


—i ~ 
| 01- 


08 


| External label. I 


|TYPE 


I 1 1- 

! 


12 


| Symbol type. I 
| SD - Section Definition (named control section) | 
| LD - Label Definition (from ENTRY statement) | 
I ER - External Reference (from EXTRN statement | 
j or V-type constant) j 
| PC - Private Code (unnamed control section) j 


|ID 


| 15- 


16 


| ESD entry number. 1 


| ADDR 


| 18- 


23 


| Address of symbol before relocation. | 


ILENGTH 


| 25- 


30 


| Length attribute of symbol. | 


| LD ID 
i 


| 34- 

L 


35 


| ESD entry number of control section where label appears. | 
■ ■ 


Instructions 


ILOCATN 


1 

1 01- 


06 


i ■ i 

| Location of assembled instruction (hexadecimal) . | 


1 

lOBJECT 
ICODE 


| 08- 
| 08- 


21, 

23 


or | Assembled instruction (hexadecimal) . | 
| Constant generated (hexadecimal) . | 


1 

|WRN 


| 03- 


05 


| Flag: Possible error in previous statement. | 


1 

ISEQ 


| 08- 


10 


| Flag: Seguence error in previous statement. | 


1 

| ERR 


I 13- 


15 


| Flag: Error in previous statement. | 


1 

|CAT 


| 18- 


20 


| Flag: Catastrophic error in previous statement. | 


1 

| ADDR 1 


| 23- 


28 


1 Effective address of 1st operand (hexadecimal) . | 


1 

| ADDR 2 


| 29- 


34 


| Effective address of 2nd operand (hexadecimal) . j 


1 

| STMNT 


| 36- 


39 


| Statement number (decimal) . I 


1 

| SOURCE 

| STATEMENT 

■ 


| 41- 
i 


120 


| Source statement (card image) . Column 40 contains an j 

I asterisk if a source statement is generated. | 
■ ■ 


Relocation Dictionary (RLD) 


i 

|POS. ID 


i 

| 03- 


04 


i i 

| ESD ID number of control section containing the constant. | 


1 

IREL.ID 
1 


| 10- 


11 


1 1 

| ESD ID number of control sections containing the address in 
| the constant. I 


1 

1FLGS 


| 15- 


16 


1 1 

I Type of constant. I 


1 

| ADDR 
i 


| 18- 
i 


23 


1 1 

| Address of constant before relocation. | 
_. .. jl _. . ... . 1 



Figure 5 9. Assembler Output Listing (Part 1 of 2) 
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IField 
I 



| Print | Meaning 
| Positions j 
_i 1 



Diagnostics 



1 ■ T 

| STATEMENT NO. | 

1 1 

IERROR | 
| MESSAGES | 


05-08 


| Listing seguence number of statement in error. | 


20-79 


j Explanation of error j 


1 1 

IACTION | 
• ■ 


80-120 


| Action taken by assembler. j 
i i 


Table of Defined Symbols 


| SYMBOL | 


01-08 
65-72 


I ,M 1 

| Source Label | 


| LEN | 


1 1-13 
75-77 


j Length Attribute (decimal) | 


IVALUE | 


15-20 
79-84 


| Value Attribute (hexadecimal) j 


|TYPE ~| 
■ i 


24 
88 


j Type Attribute (decimal) | 
i i 


Cross-Ref erence List (Replaces Table of Defined Symbols 

when CROSSREF appears in AOPTN.) 


| SYMBOL | 


01-08 


| Source Label | 


| LEN | 


10-13 


| Length Attribute (decimal) | 


IVALUE | 


15-20 


1 Value Attribute (hexadecimal) | 


|DEF* | 


22-26 


| Listing seguence number of statement which defines label. j 



ICROSS- 
IREFERENCE* 



30-34 

36-40 

42-46 

48-52 

54-58 

60-64 

66-70 

72-7 6 

78-82 

84-88 

90-94 

96-100 

102-106 

108-112 

114-118 



Listing seguence numbers of statements which 
contain the label. 



* The maximum number of symbols and cross references to 
symbols that can be listed is 20,625. 



Figure 59. Assembler Output Listing (Part 2 of 2) 
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EXTERNAL SYMBOL DICTIONARY 



SYMBOL TYPE 10 AOOR LEN6TH LO 10 
SAMPLE SO 01 0012C0 0002E3 



LOCA.TN OBJECT CODE AOOR I ADDR2 ST«NT SOURCE STATEMENT 

0001 AOPTN ENTRY 



U8728/63 PACE 00 1 



SNPLOOOI 



SAMPLE PROGRAM 
LOCATN OBJECT CODE A00R1 AO0R2 STMNT 



0003 
000* 
0005 
0006 
0007 
0009 
0010 
0057 
0059 
0060 
0061 
0069 
0075 
0076 
0077 
0076 
0083 
0084 
0085 
0086 
0087 
0088 
0089 
0095 
0100 
0101 
0102 
0103 
0104 
0105 
0106 



08/28/65 RASE 002 



SOURCE STATEMENT 



001338 0950 
00133A 



001362 IB33 
001364 4120 5009 
001368 0263 50T5 2000 

001378 4133 0001 
00137C 4230 5074 
001380 9504 5074 
001384 4780 5058 
001386 4122 0064 
001 38C 47F0 502E 



01413 

013AF 00000 

00001 
013AE 
013AE 
01392 
00064 
01368 



001 JAE 
0013AF 

001*13 4B4B4B4B4B4B4B4B 
001477 C2C1E2C9C3400607 
0C140B E6C9E3C640C90507 
00153F 4B4B4B4B4B484B4B 
001928 



ISEQ 77.80 SMPL0003 

PUNCH a PHASE SAMPLE. 59 SKPL0D04 

SAMPLE START 4800 SMP10005 

PRINT NOG EN SHPL0006 

OTFBG DISK SMPIOOOT 

PRINT OTFSR BLKSIZE«100,C0NTRCL#YE5,DEVADDR*SVSLST,0EVtCE*PRINTER.I0XSMPL0008 

AR£Al#KAPA»RECFDRM#FIXUNB,TYPEFLE*OUTPUT SMP10009 

OTFEN SHPL0010 

BEGIN BALR S.O SMPL0011 

USING *.5 SMPL0012 

OPEN PRINT SMPL0013 

CNTRL PRINT, SK.l SMPL0014 

SR 3.3 SMPL0015 

LA 2. MESSAGE SMPL00t& 

MOVE MVC KAPA.0S2Q 5MPL0D17 

PUT PRINT SMPL001B 

LA 3.1X30 SMPL0019 

STC 3, TEST SNPLD020 

CLt TEST.X8048 SHPtOOJl 

BE ENOPROG SMPL0022 

LA 2.100*2o SMPL0D23 

B MOVE 5MPL0024 

ENOPROG CNTRL PRINT. SK.l SMPL0025 

EOJ SWPL0026 

TEST OS CL1 SNPX0027 

KAPA OS CL100 SMPL002B 

MESSAGE DC CL1003 IBM SYSTEM /360.. .9 SMPL0029 

OC CL1009BASIC OPERATING SYSTEM ASSEMBLERS SMPL0030 

DC CLlOOflWITH INPUT OUTPUT MACR0S-8K DISKS SMPL0031 

OC CLIOOS..... 3 SMPL0032 

END BEGIN «MPL0033 




Figure 60. Example of an Assembler Listing (Part 1 of 2) 
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( 



f 



POS.IO REL.IO FLCS AODR 



O012CO 
0012CA 
O012C0 
001264 
0012F9 
001314 
001320 
001329 
001334 
001350 
00135C 
001374 
001398 



01 


01 


oc 


01 


01 


04 


01 


01 


ci 


01 


01 


04 


01 


01 


08 


01 


01 


04 


01 


01 


04 


01 


01 


08 


01 


01 


OC 


01 


01 


OC 


01 


01 


OC 


01 


01 


OC 


01 


01 


OC 



JO 

a 




DIAGNOSTICS 



08A2B/69 



HO ERRORS IN THIS ASSEMBLY 



TABLE OF OEFINEO SYMBOLS 



SYMBOL 


LEN 


VALUE TYPE 


BEGIN 




1338 I 


ENOPROG 




1392 I 


ICCB0003 




13U X 


ICCU0003 




1328 A 


IGCB0003 




12C4 X 


IGCH0003 




12F8 A 


I0CC0005 




1350 A 


IPRR0003 




12F2 X 


IPRT0003 




12E6 I 


KAPA 


100 


13AF C 


MESSAGE 


100 


1413 C 


MOVE 




1368 1 


PRINT 




12C0 


PRINTA 




1334 A 


PRINTB 




1330 X 


PRINTC 




1300 I 


PRIMTP 




1202 1 


SAMPLE 




12C0 * 


TEST 




13AE C 



a 

cr 

a 
o 



a 
Q_ 

co 
>< 
3 
o- 




Figure 6 0. Example of an Assembler Listing (Part 2 of 2) 
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I ■ 1 

The following is a listing of the card groups reguired for the execution of an 
object program when a disk-resident system is not used. Card groups produced by the 
Assembler in addition to those listed here are the External Symbol Dictionary (ESD) 
and the Relocation Dictionary (ELD) , which are used only if a Linkage Editor run is 
required before execution. 



Card Groups (in order 
of loadinq) 



Loqic of Execution of the Object Proqram 



IPL Loader 



Supervisor 
Proqram Loader 



First Problem Proqram; 
End Card 

Data (if present 
in card form) ; 
Data End Card 

Second Problem Proqram; 
End Card 



Data (if present 
in card form) 



(Any one or several of 
these Problem Proqrams 
may be a Job Control 
proqram. See Operatinq 
Considerations. ) 



Last Problem Proqram; 
End Card 

Data (if present 
in card form) ; 
Data End Card 



The operator initiates the loadinq of the IPL Loader with 
the load key on the console. 

The IPL Loader loads the Supervisor and the 

Program Loader, and then transfers control to the Program 

Loader. 



The Program Loader loads the First Problem 
Program, and then transfers control to it. 

The First Problem Program runs to end-of-job, 
Sharing control with the Supervisor. 



When the First Problem Program reaches end-of-job, 
control is transferred back to the Program Loader which 
loads the next Problem Program and transfers control to it 



When the hopper becomes empty^ an error message 
will be transmitted to the operator, and the 
system will enter the wait state. 



If the operator has more Problem Programs or data cards to run, he must place 
these cards in the hopper and press the interruption key to resume the operation. 

If another Supervisor is to be used, that Supervisor and a Program Loader must be 
loaded together by the IPL Loader. 

If the execution of a Problem Program causes the Program Loader to be overlaid or 
otherwise disturbed, the Supervisor and the Program Loader must be reloaded together 
by an IPL Loader before the next Problem Program can be executed. 



Figure 6 1. The Object Run When a Disk-Resident System Is Not Used 
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AP PENDIX J: ASS EMB LER DIA GNOSTIC MESSAGES 



Diagnostic messages are printed if 
violations of the assembler language are 
detected by the Assembler program. With 
each message is printed the number of the 
related source program statement, and the 
associated action taken by the Assembler 
program (Figure 62) . If more than one 
error is detected for a source statement, 
the diagnostic messages for all errors 
detected are listed. In this case, the 
Assembler takes the action that is the most 
severe (for the errors detected) , and that 
action is printed with the diagnostic 
messages . 



The following list gives the types of 
assembler actions in the order of their 
severity. The most severe action is given 
first. 



ASSEMBLY IN ERROR (AIE) - The user's 
program cannot be executed. The 
assembly runs to completion, but only 
the diagnostic messages preceding the 
ASSEMBLY IN ERROR message may be 
considered valid. 



GENERATION TERMINATED - Generation of one 
macro is terminated. This does not 
affect the generation of other macros. 

STATEMENT TREATED AS COMMENTS (STC) 

STATEMENT INCOMPLETELY ASSEMBLED (SIA) - If 
the statement is a machine instruction, 
the amount of main storage necessary 
for the instruction is reserved and 
filled with zeros. 

STATEMENT ASSEMBLED (SA) 



1" ■■' '■ 1 

| Diagnostic Message 


- T - - - ■ — - -■ ■ - ■ - ■ 

| Meaning 


T 1 " 1 

| Associated | Notes | 








| Action j | 


|ASSEM CTL CD- INVALID 


| An 


AOPTN, AWORK, or an ALOG card 


| SA | j 


|NAME FIELD 


|has 


been detected with an entry 






|in 


the name field. The name 






| field was ignored, but the rest 






|of 


the card has been processed. 




IASSEM CTL CD- INVALID OR 


| An 


AOPTN card was given with no 


|SIA | | 


|MISSING OPERAND IN 


| operands or with an operand 




ICONTROL CARD 


j function which does not egual one 






lof 


the valid options that can be 






Ispecified. The invalid operand is 






lignored and any other operands 






| present are processed. 




|BITS 37 THROUGH 39 IN CCW 


|Bits 37, 38, and 39 in a CCW 


1 SA | | 


| ARE NON-ZERO 


| statement are not zero. 




ICONSTANT TRUNCATED 


ISpecified constant length is less 


| SA | | 




|than the actual constant length. 




| ILLEGAL FORMAT 


11. 


Invalid delimiter. 


|SIA | | 




|2. 


Missing field in CCW statement. 






|3. 


Extra field (s) appear in state- 








ment operand. 






|4. 


First operand is a literal. 






|5. 


More than one literal operand 








encountered. 






|6. 


Blank operand in a machine 








instruction or in a CCW, DROP, 


1 L 1 






ICTL, USING, or XFR assembler 




i ...... 


. j .., 


instruction. 


1 1 1 



Figure 62. Assembler Diagnostic Messages (Part 1 of 7) 
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1 — ■ - ' 


■ T 




-r 1 1 


| Diagnostic Message 


| Meaning 


| Associated | Notes | 




— 1 




| Action | | 
H 1 \ 


| ILLEGAL MODIFIER IN DC 


1 1 • 


Incorrect modifier or modifier 


ISIA | | 






value in a DC statement. 






|2. 


Incorrect combination of 


i 1 1 






exponent modifiers. 


1 1 1 




|3. 


Exponent and/or scale cannot be 


1 1 1 






applied to the constant 


1 1 1 






provided. 


I ! J 


| IMMEDIATE DATA INVALID 


| The 


immediate operand in an SI 


ISIA | | 




(instruction is: 


1 1 1 




M- 


Not a self-defining term. 


1 1 1 




|2. 


An invalid self-defining 








term (e.g., more than one byte) 


1 i i 


IIMPEOPEE START VALUE 


|The 


value in a START statement is 


-\ 1 \ 

ISA | | 




| not 


a multiple of eight. (The 


1 1 1 




lvalue given is increased to the 


1 i 1 




| next higher multiple of eight). 


1 1 1 

-j. 1 1 — \ 


| INVALID ASSEM CTL CD 


1 1. 


The operand of an A WORK card 


|STC | | 






is not a single operand of 








either 1 or 2. 


! 1 1 




|2. 


The name field of an A FILE 


1 1 1 






card is blank or contains ALL. 


1 1 1 




13. 


The operand field of an AFILE 








card is not LIBRARY or LIBRARY, 


[ J [ 


1 " 




RETAIN. 


1 II 


IINVALID BOUNDARY ALIGNMENT 


(Instruction is not aligned on the 


H 1 1 

ISA | I 




| proper boundary , ie, for use with 


1 1 1 




| an 


execute instruction. 


1 1 1 


IINVALID EXPRESSION 


1 1 • 


For all instructions except 


H 1 1 

ISIA | | 


1 \ 




CCW, DC, ORG, EQU, and USING: 


1 i 1 


i \ 




the value of the expression 


1 1 1 






is negative. 


1 1 1 




|2. 


The expression has more than 


1 1 1 






three terms. 


1 1 1 




|3. 


The expression is complexly 


1 1 1 






relocatable, but it is not 








allowed for this instruction. 


i i ! 




14. 


The terms in a multiply or 


i i i 






divide expression are not 


i i i 






absolute. 


i i i 




|5. 


An arithmetic operator begins 


i i i 






or ends an expression. 


i i i 


IINVALID LENGTH VALUE 


| For 


SS type instructions only. 


H H 1 

ISIA | | 




M. 


Length is negative. 


1 1 1 




|2. 


Length is greater than 256 


1 1 1 




13. 


For two-length instructions: 


1 1 1 






a. L1 or L2 is negative. 


1 1 1 






b. L1 or L2 is greater 


1 I I 






than 16. 








For multiply and divide 


j J j 






instructions: 








a. L1 or L2 is negative. 








b. L1 greater than 16, 








or L2 greater than 8. 




< 




c. L2 is greater than L1. 


_.L - . 1 1 



Figure 6 2. Assembler Diagnostic Messages (Part 2 of 7) 
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I" ■ — 

IDiagnostic Message 


| Meaning 


r- 

| Associated | Notes | 




} 




j Action | | 


1 INVALID LITERAL 




21 1 *i *ho T*a 1 a nno ^ t c "in fho 
A u.e Ldi a ^ pe a x is xii u nt; 


4 1 1 

1 SIA | | 


ISPECIFICATION 




first operand of an 


1 1 1 






instruction. 








i lit: XX Lei al XO lll^ULi ci^ L« 


I « ! 






^ i lie X Uxeo IOL HXcL axo ale 


i i i 




J 


lUcll tlLal T-U ullc L UXeo IUL 


i i i 






T\ /"*• r*" 4" O T"» 4* CT* \ 

cuns udniSi j 


i i i 






bi t ci ctx upci aiiu lido likj it;! l 


i i i 








i i i 

■{ 1 \ 


| INVALID NAME FIELD 


i i 
1 ' * 


"T? />t~ all i ncf rnp+ 1 or. c avro n+* 

i;OX CL XX 1UO Li Uv tXvllO CA^C^L 


1 SA | | 






mTrnrp. TflO CT 7\ "f" Qnpnf na mo 
111 LJj • x lie O Uu LcUICll w XI a 111 e 


1 1 1 




| 


JJ ey Xll o WXL.I1 a. 11 Ull aipilaJJc tlL 


1 1 1 




J 


^llaiattcL • l-**/ w 9 dilU -it dXe 


1 1 1 




J 
J 




1 1 1 






L eX o • J 


1 1 1 




|2. 


The statement name is longer 


1 1 1 






than eight characters. 


i ! ! 






TJ An ail Till a m at* i pTiarapf ore a n a t* 
a <Jil dX yii dUt ex XL* unaiatLcio appeaL 








ui 4* hi n 4rli«o 4- o 4- Qwon 4 n a in q 
w XX 11X11 Xlle oXdXelllellX 11 dill e • 


1 l I 






A cr4-^"f~»QiTi4onT" namo "i c; nrocronr 
a o l.cl ueiueu c name xo {jlcocu t 


1 1 ! 






in a a+pmpnt whir'h mav nnt 

xii u o un tcuicu u nuivu mcL j uv o 


1 1 1 




J 


li a vo a na n.p 
Have a 11 a 111 e • 


1 1 1 




|5. 


A DSECT statement has no name. 


1 1 1 


{invalid occurrence 


1 1 

i i • 


r JL^^luiu 11 a o ill vJ x e u ii a li \J ii e 


| STC | | 


|OF ASSEMBLER OPERATION 




CPU DT r^a t*<1 






1 9 


A O 1 A L\ X dX U. Xo XlilpXvJlJeXxy 


1 1 1 






rl arpfl in +■ Vi o nrnnrp m 
piuvcu xii cue pLU^iauit 


1 1 1 




1 3 


A LiUjAb d p JJed x o W X L 11 X 11 d 


1 1 1 




J 


QUUliny UUll tiOi beCllUIU 


1 1 1 


| INVALID REGISTER IN 




tletJXoXeX opeUXXXeQ Xll d 


4— 1 1 

1 1 1 


| USING OR DROP 




USING or DROP statement is 


1 1 1 






other than 0 to 15. 






1 0 


ficyioicl v Xo opeVrXXXeU. Xll d 


J ] J 






U jlUlu btatclllcUt WXLJ1 d 11 Ull 


1 1 1 






7om ahcnl nfp up 1 no 
u ujjouxu ic v a x ue • 


1 1 1 




1 3 
1 J • 


ttcvJlbLcL t/ / W UUll UoeU. W X C 11 d 


1 1 1 






UOin*J o La LeUlcll L / XO 11UL L.lle 


1 1 1 




J 
J 


^LXXoL. LeyibLcL oLJeOXlXeU* 


1 1 1 


| INVALID REGISTER 


1 ' • 


P flfli c + or chop i ^ t l o Afh or 
XVeyXoUeX opeOXXXeU Xo UlucI 


_l_ 1 1 

ISIA | | 


ISPECIFICATION 




una ii u u vj i j» 


i i i 




|2. 


Floating point register spec- 


i i i 






ified must be 0 r 2, 4 # or 6. 


I ! ! 






Ddoc L^yiolcL o O-L J- -L trLl Xii d 








L c-LuCa La JJXc U JJ c L dilU • 


i i i 




| 4 • 


XII- a UjIDu UL JJtiUlr ol d Lclll till u ^ 


l i i 






a relocatable expression 


i i i 






appears in an R1, R2/ R3 # R4, 








or R5 field. 


J j j 


| INVALID SELF DEFINING 


|The 


self-defining term: 


ISIA | | 


ITERM 


11. 


is too large. 






|2. 


is too long. 




■ 


|3. 


contains an invalid character. 


J. _L J 



Figure 62. Assembler Diagnostic Messages (Part 3 of 7) 



Appendix J 247 



Diagnostic Message 



Meaning 



Associated 
Action 



Notes 



LIMIT EXCEEDED 



1. The value of th 
counter has exc 

2. The value of th 
ter set by the 
has gone below 
value of the co 

3. The total numbe 
DSECT, EXTRN, 'a 
type) statement 

4. The total numbe 
DSECT statement 



e location 
eeded .224-1 
e location coun- 
OEG statement 
the initial 
ntrol section, 
r of CSECT, 
nd DC (V- 
s exceeds 255. 
r of CSECT and 
s exceeds 32. 



AIE 



MACRO-INNER MACRO 
NESTING DEPTH 
EXCEEDED 



An inner macro instruction has 
been given within a third level 
macro. (This macro will not be 
expanded.) 



STC 



1, 2 



MACRO INST-INVALID 
OPERAND 



1 . Operand longer than 8 char- 
acters. 

2. Operand has an egual sign in 
other than the first position, 



STC 



MACRO INST-TOO 
MANY OPERANDS 



More than 49 operands in a macro 
instruction. The extra operands 
are ignored . 



SIA 



MACRO IN ST- UNDEFINED 
KEYWORD 



Keyword in macro instruction does 
not match any keyword defined in the 
prototype. This operand is ignored; 
all other operands are processed. 
NOTE ; Only one message appears when 



SIA 



more than one undefined keyword 
appears in the same card of a macro 
instruction. 



MACRO-INVALID DATA IN 
ARITHMETIC OPERATION 



Non-numeric character encountered 
in an AIF, AIFB, or SETB statement 
with an arithmetic relation or a 
SETA statement. 



STC 



1,2 



MACRO-INVALID RESULT 
IN ARITHMETIC OPERATION 



For an AIF, AIFB, or SETB state- 
ment with an arithmetic relation 
or a SETA statement: 

1. Result is negative. 

2. Result is greater than 2 2 *-1. 



STC 



1,2 



MACRO-INVALID 
SUBSTRING 



Specified substring not wholly 
contained in the character string 
of a SETC instruction. 



STC 



1, 2 



MACRO-INVALID SYSLST 
REFERENCE 



SYSLST reference to a parameter 
number greater than 49 was 
encountered. 



STC 



1, 2 



MACRO-LONG FINAL RESULT 
IN A CHAR. OPERATION 



Character string result has exceeded 
eight characters in an AIF f AIFB, or 
SETB statement with a character 
relation or a SETC statement. 



STC 



1,2 



Figure 62. Assembler Diagnostic Messages (Part 4 of 7) 
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JDiagnostic Message 


' r ■ - ' — ■ 
| Meaning 


i 

| Associated 
| Action 


T " - l 

| Notes | 


| MACRO-LONG INTERMEDIATE 
IRESULT IN A CHAR. 
| OPERATION 


| Character string has exceeded 
Isixteen characters for an AIF, 
| AIFB, or SETB statement with a 
| character relation or a SETC 
[statement. 


| STC 


1 1, 


2 I 


| MACRO SEQUENCE SYMBOL 
|NOT FOUND 


|No seguence symbol found in a 
Imacro-def inition for an AGO, 
j AGOB , AIF, or AIFB statement. 


| generation 
| terminated 


I 1, 


2 I 


| MACRO-UNDEFINED OP 
|CODE 


| An instruction with an operation 
jcode which is not recognized as 
|a valid System/360 operation code, 
land is not contained in the macro 
llibrary, was found during macro 
Igeneration. 


| STC 

| 


|2 




| MNOTE (plus a message 
jcontained in the macro 
jdef inition) 


|A message from the macro coder to 
jthe macro user, generally iden- 
tifying an error in the macro 
| instruction. 


| None 






| MULTIPLE DEFINITION 


|1. Identical symbols appear in 

| the name fields of two or 

| more statements. 

|2. For an EXTRN statement: 

j a. Operand is identical to 

| the name field of another 

| statement. 

| b. Two or more statements 

| have identical operands 

| 3. The name fields of a CSECT 

j and a DSECT statement are 

| identical. The statement 

| encountered second is con- 

| sidered unnamed. 


| SA 






|NOT ADDRESSABLE 


|1. Base register (s) specified in 
| USING statement (s) can not 
| be applied. 

|2. A base register has been spec- 
| ified in a relocatable op- 
| erand. 

|3. An absolute displacement is: 

| a. Negative. 

| b. Greater than 40 95. 

j 4. No base register specified. 


| SIA 






| OPE RATION TERMINATED 
|ON UPSI BIT 7 


j Operator intervention due to 
|loop during macro generation 
| (UPSI bit 7 was turned on) . 
| AGOB, AIFB, and inner macro 
j j calls are not processed. 
• 


| STC 
_j. , 


I 1, 


2 I 



Figure 62. Assembler Diagnostic Messages (Part 5 of 7) 
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Diagnostic Message 



Meaning 



Associated 
Action 



Notes 



STATEMENT FORMAT CANNOT 
BE ANALYZED 



b. 



c . 

a. 



1. Invalid term in a CNOP 
statement. 

2. Erroneous operand in an 
ICTL, ISEQ, ORG, or EQU 
statement. 

3. Blank operand in a DC, DS, 
EXTRN, or ENTRY statement. 

4. For a DC. or DS: 

a- First character in operand 
field is not alphabetic, 
numeric, or an apostrophe. 
No apostrophe or alpha- 
betic character follows 
the duplication factor. 
No terminating apostrophe. 
Terminating apostrophe 
followed by a non- 
blank character. 

e. Length specified is 
non-numeric. 

f. Duplication factor is longer 
than eight decimal digits. 

g. Invalid constant type. 

h. Explicit length greater 
x :ian 256 or equal to 0. 

x. Explicit length for a 

V-type constant is 1 or 2. 
DC or literal has no fourth 
subfield . 

Parentheses are not paired. 
In a DC or CCW statement: 

a. A field is missing. 

b. Bad data is given. 
No initial apostrophe or no 
operand in a PUNCH or TITLE 
statement. 



STC 



5. 

6. 
7. 



8. 



SYMBOL NOT PREVIOUSLY 
DEFINED 



A symbol in the operand of an ORG 
or EQU statement is not defined 
in a previously encountered in- 
struction. 



STC 



TOO MANY CONTINUATION 
CARDS 



An instruction (other than a 
macro instruction) has more than 
one continuation card. 



STC 



TOO MANY REGISTERS 
SPECIFIED IN USING 
OR DROP STATEMENT 



More than five registers are spec- 
ified in a USING or DROP state- 
ment. 



SIA 



UNDEFINED OPERATION 
CODE 



Mnemonic operation code is not 
recognized as a valid IBM System/ 
360 operation code, and is not 
contained in the macro library. 



STC 



UNDEFINED SYMBOL 



A symbol has been referenced but 
it is not defined in the name 
field of any instruction. 



SIA 



Figure 62. Assembler Diagnostic Messages (Part 6 of 7) 
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1 — 

IDiagnostic Message 


—i ..... 

1 

| Meaning 

H 


T 1 1 

| Associated | | 
| Action | Notes j 


IUNPAIRED AMPERSAND 


|Odd number of ampersands en- 
jcountered in a constant. (Two 
| ampersands must be specified 
|for every ampersand wanted in 

|a constant.) 
• 


| SA | | 
i i i 





NOTES: 



|1. These messages refer to statements in the assembly which contain additional | 

| information. This additional information is: the macro name, the operation code | 

| of the instruction in error within the generated macro, and a pointer to that | 

| instruction. I 

|2. Macro diagnostic messages may be caused by improper coding of a macro-definition, | 

| or by improper data in the macro instruction (for example, alphabetic characters | 

| supplied for a length specification) . I 

i i 

Figure 62. Assembler Diagnostic Messages (Part 7 of 7) 
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APPENDIX K; S UMMARY OF - IMPERATIVE MACRO INSTRUC TIONS 



1 ' - ~ — ■ ■■ ■ - - — ■ - ■ - - - — -, 

I Macro Format | 


| Input/Output Control Macros | 


|Name 


| Operation 


| Operand 










| BCLOS 


| dtf name 










| BOPEN 


1 (See Binary Synchronous Communication for operands to 
|the BOPEN macro.) 


be 


used 


with | 


| blockname 


| CCB 


| SYSnnn, command- list- name, X * yyyy 1 










| CDCNV 


1 "type, startaddr, lenqth 










ICHKPT 


| n, restart-name, SYSnnn, DISK 










| CHNG 


1 SYSnnn 










| CLOSE 


| filename 

| f ilenamel ,f ilename2, f ilename3, . . . 










| CNTRL 


| filename, code, n, m 












| filename, SEEK 












|dtf name, code, n 












|dtf name, code 










IDSPLY 


| filename, r, r 










| DTAL.0 


|7See Processing with STR- Devices for the operand that 
|with the DIALO macro.) 


may 


be 


used j 




| ENDFL 


| filename 










| ERRPT 


| dtf name 










| ESETL 


| filename 










IEXCP 


| blockname 










| FEOV 


| filename 










| GET 


| filename 

1 filename, workname 












j filename, ,IS 

| filename, workname, IS 










IIDIAL 


1 (See Binary-Synchronous Communication for operands to 
|the IDIAL macro.) 


be 


used 


with | 




(LBBET 


| 1 

|2 








« 


| OPEN 
• 


I filename 

| filename 1 ,f ilename2, .... 






■ 
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1 — 

| Name 


T ... - - 
| Operation 


T — - 1 

| Operand | 




|PRTOV 


| filename, n, routine-name | 




| PUT 


| filename j 
j filename, workname | 




j 


| filename, , IS j 
| filename, workname, IS | 




| RDLNE 


j filename j 




| READ 


| filename, KEY I 
I filename, ID I 






I filename, KEY, IS j 






1 filename, OR,(name{ 1 

! V r) j { 




j 


| dtf name,STR I 






| dtf name, BSC,type-code | 




IRELSE 


| filename | 




IRESCN 


| filename, r,r, n, F | 




ISCLOS 


jdtfname I 




| SETFL 


| filename | 




| SETL 
j 


| filename, BOF I 
| filename, KEY I 
| filename, idname I 




ISOPEN 
j 


1 (See Processing , with STR Devices for the operands that may be used | 
|with the SOPEN macro.) | 




| TRUNC 


| filename j 




| WAIT 


| block name I 




| WAITF 


| filename | 




| WAITM 


(blocknamel , blockname2, . . . I 
| blocknamen, reg I 




| WRITE 

j 

[ 


| filename, KEY I 
| filename, ID j 
| filename, RZERO I 
| filename, AFTER | 






(filename, NEWKEY, IS | 






| filename, KEY, IS I 






jdtfname, STR I 


i ,.. . _ , ... 


. _. L 


Idtfname , BSC, type-code | 
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I"~ ■■ -■ '■" ■■ - '■■ ■• ■ ' -■■ - - ■■ — 1 

| Supervisor Communication Macros | 


|Name 


l 

|Operation 
i 


i 

| Operand 




| |COMRG | | 
1 1 1 1 


| |DUMP | | 
t 1 1 1 


1 IEOJ | | 




j EXCP 
1 — 


j blockname 






|EXIT 
1 


m 






1 

| FETCH 


| name 






1 

| MSG 


| cod e , REPLY 






1 

IMVCOM 
1 


| byte ,ji f location 






1STXIT 
i 


ln,pc-name,it-name # oc-name 




j Supervisor Assembly Macros | 




| IOCFG 
1 


■ 

| keyword=YES ,keyword=YES, . . . 

-I 






| SEND 
1 


| n,REP 

A ^ 






JSUPVR 
1 

1 


|DISK=YES,CONFG=nnnnnnnn,TR=YES,CR=YES,SAVEREG=yes 
| CONFG=nnnnnnnn, TR=YES, CR=YES r CHKPT=YES 

H 






ISYMUN 
• 


|n,X*ccuu' ,X 1 ddss' /X'ccuu' ^X'ddss 1 




I Job Control Assembly Macros j 




|JBCTL 
— H 


i 
1 




L 


| RSTRT 


+~ : : 

1 


1 

1 
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AP PENDIX L: BLANK, SUBSTITU TE BLANK, AND INTERMEDIATE LRC REQUIREMENTS 



r— t 
1 1 
1 1 


BOS/BPS 
STR 


17702 
| BINARY 


17702 
|BCD 


17711 | 
| BINARY | 
\ \ 


7711 | 
BCD | 


1978 
BINARY 


r ■ — r 
1978 | 
BCD | 


1013 


1009 
BINARY 


r — 1 

1009 | 
BCD | 


J 7 \ 

1 Tra n Qni i "he; 1 

|lJ-Clll.Olli-LL.O | 

IBlank | 
1 \ 




1 RrtYM 
| KUA a 


| A IN V ii Li AD 


1 1 
\ \ 


A a V a L> A U \ 


ilUAH 


ZHOU j 


ZHOU 


n ua n 


ZHOU | 


| 1 J- d. 11 o III J- Xfe 1 

| Substitute | 
IBlank | 
j i 


on ftn 


1 Oil Afl 
| ZH ou 


1 ZHOU 


| Ztou | 
1 1 
1 1 


ZHOU 5 


ZHOU 


TMV1T T n 1 
[ AIM V iiLi ±U | 


A a V iiLi ill 


OilPifi 

ZHOU 


ZHOU | 


4 1 

ITranmits | 
|and re- j 
jceives j 
jintermed. | 
|LRC | 
I 1 


YES 

or 

NO 


| NO 


|NO 


| | 
|N0 | 
j 1 
1 1 
1 1 
1 1 
■\ \ 


NO | 


YES 


| YES | 


YES 


NO 


YES | 


| Receives | 
1R0XN | 


Blank 


| Blank 


| INVALID 


IBlank | 
1 1 


Subst. | 
Blank j 


Blank 


| INVALID | 


INVALID 


Blank 


INVALID | 


1 j 

|Receives | 
12480 | 
i _ i 


Subst. 
Blank 


| Subst. 
| Blank 
i. ... _ 


| Subst. 
IBlank 

JL_ 


■\ 1 

| Subst. | 
IBlank | 


Subst. | 
Blank | 
. , i 


Blank. 
Blank 


Blank | 
i. i 


Blank 


Subst. 
Blank 

, i 


Blank | 
, i 



r— 

1 

1 


T 

|Card Code 
1 

— 1 


T - 

| 7 bit Tape Code 
| (Even Parity) 


■T — 1 

|7 bit Tape Code | 
| (Odd Parity) | 


j 

IBlank 


| No Punches 
H 


H 

| Invalid 


H 1 

|C bit | 


1 

|Subst. 

IBlank 

• 


| 2-8 

| Punches 

x 


H — 

|C-A Bits 

1 

-X _ 


-4 —\ 

|A Bit | 

1 1 

j i 



The 7702, 7711, 1978, and 1009, all in binary mode, handle blank 
and substitute blank compatibly with BCS/BPS STR support. 

THE CDCNV macro instruction may be modified to transmit a blank as 

2-4-8-0, or to receive a 2-4-8-0 as a blank. This modification may 

be used to provide compatibility with the 7702, 1009, and 1978 in 
BCD, and the 1013. 

To modify CDCNV, type E, for transmitting a blank as 2-4-8-0, 
execute the following instruction before converting the first record: 

MVI IOCTBLE+64,X« 2E 

To modify CDCNV, type F, for receiving a 2-4-8-0 as a blank, 
execute the following instruction before converting the first record: 

MVI IOCTBLF+46,X'40« 

The CDCNV macro expansion provides the table for translation on 
the first expansion of a particular type. Therefore, if the problem 
program uses types E and F, modified and not modified, in the same 
program, the byte in guestion must be modified before each CDCNV 
(type E or F) used. 
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APP ENDIX M: BINARY S YNCHRONOU S C OMMU N ICATION 



PART 1 - EBCDIC SPECIA L CHARACTER TABLE (IOBSCT ) 



CHARACTER 


HEXADECIMAL 

dcdd cc c KIT ATIO K.I 


LENGTH 

1 IN DTI to 


MEANING 


PROVIDED 
RY * 


MVw l\ \J 


1 070 


2 


Even— odd positive alternating 
acknowledgments 


IOCS 
(pr.pr.) 


ACK-1 


1061 


2 


ENQ 


2D 


1 


Inquiry — requests permission 
to send 


IOCS 
(pr.pr.) 


EOT 


37 


1 


End-of-transmission character 


IOCS 


DLE STX 


1002 


2 


Start-of— transparent— text 
sequence 


or .or . 


DLE EOT 


1037 


2 


Disconnect sequence 


IOCS 


WABT 


107F 


2 


Wait-before-transmitting 
sequence 


IOCS 




1 003 


2 


F n H — r> f - 1 rn n mn rf» n t— fp yc t 

sequence 


IOCS 


DLE ETB 


1026 


2 


End-of-transpa rent-block 
sequence 


IOCS 


STX EOT 


0237 


2 


Positive acknowledgment but 
signifies inability to continue 


pr.pr. 


DLE ENQ 


102D 


2 


Disregard this record 


IOCS 


NAK 


3D 


1 


Negative acknowledgment - 
requests retransmission 


IOCS 


SOH 


01 


1 


Start-of-header character 


pr.pr. 


*pr.pr. - This character is supplied by the problem program as a part of the text message. 

(pr.pr.) - This character is included by the problem program after the last ID-character in 
each ID-sequence . 

IOCS-BSC support (macro routines or error recovery procedures) supplies this character. 
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PART 2 - - - SUMMARY OF - CHECKS - TO - BE MADE - AT I/O COMPLETION • 



CHECK 


LOCATION 


IF ON, CHECK FURTHER FOR 


LOCATION 


Normal Completion 


BSC flag byte 1 — 
COMPLETION 

bit U 


No further checking is necessary 
unless a READ operation — then 
check tU 1 or ULt EOI received 
(which are normal completions). 


BSC FLAGS 
byte II — 

DC^"ciwcr\ ft _ 

RECEIVED flags — 
bit 6 


I/O Error 


BSC flag byte 1 — 
V-VJ/V\rLt 1 IvJIN 

bit 1 


Lost data (READ macros) 


TRANSMISSION 

C| A C L.i. 1 1 

rLAoj — byre II 
(dtfname + 7) 
bit U 






Bus-out check 


bit 1 






Intervention required 


bit 3 






Time out 


bit 6 






Unit exception* 


bit o 


Message Format Error 


BSC flag byte 1 — 
COMPLETION 

bit /. 


This bit alone: 

1 . unrecognizable response 
characters 

2. text messages with invalid 
text-framing characters 








Invalid ID ^lUIAL only; 


b5L tlag byte I 
COMPLETION 
bit 5 






Invalid ACK (WRITE macros or 
(DIAL) 


BSC flag byte 1 
COMPLETION 
bit 7 






Unexpected response and a 
bit in byte II— RECEIVED 
flags (EOT, WABT, etc.)** 


BSC flag byte 1 
COMPLETION 
bit 6 and byte 
II RECEIVED 
flags 



* Set by PIOCS to indicate unit exception on a WRITE command, which occurred because the CPU 

attempted to transmit while in receive mode. This normally is a contention situation, occurring when 
both CPUs attempt to transmit at the same time . Because the line has probably been "cleared" by a 
READ command with the skip flag on, issued by PIOCS, a retry of the failing macro will probably be 
successful . 



If an EOT is received as an unexpected response to a WRITE macro on a switched line, the transmitting 
CPU (which issued the WRITE macro) should issue a CNTRL EOT macro. This allows the remote 
(receiving) CPU to issue CNTRL ENQ and to transmit. 
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PART 3 - SAMPLE PROG RAM 

The BOS/BSC sample program (Figures 63 and 
64) illustrates line control procedures for 
a leased line and error checking after the 
completion of BSC macros. The listings are 
self-explanatory. 

Figure 63: 80-character records are read 
from a card reader and sent to the 
remote CPU (Figure 63) . At EOF on the 
reader, EOT is sent to the remote CPU, 
signifying end-pf-transmission. READ 
TQ (inquiry) is issued to prepare to 
receive records from the remote CPU. 



The 80-character records received are 
printed. At end-of-job, the ERRPT 
macro is issued to display the error 
statistics and transmission count. 

Figure 64 : CNTRL Prepare is issued to 
prepare to receive records from the 
remote CPU. The 80 characters received 
are printed. When EOT is received, 
CNTRL ENQ is issued. 80-character 
records are read from a card reader and 
sent to the remote CPU (Figure 63) . At 
end-of-job, the ERRPT macro is issued 
to display the error statistics and 
transmission count. 
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// JOB ASSEMBLER 
// DATE 67130 

// VOL SYS000,W0RK1 

// OLAB 'BOS 8K DISK 1111111*. * 

0001,65099,65099, •0000000000000* 
// XTENT 1,000,0116000,0195009, •111111* ,SYS000 

// EXEC 

AOPTN ENTRY 
REPRO 

PHASE TESTA, S 

TITLE • SAMPLE PROGRAM - CPU-A« 
START X«1F08* 

* 

* FILE DEFINITION SECTION — CARD READER AND PRINTER 
* 

OTFBG DISK 

RDFILE OTFSR BLKSIZE=80»DEVADDR=SYSIPT,DEVICE=READ40, EOFADDR=EOT» * 

I0AREA1=RDCARD,TYPEFLE=INPUT 
WTFILE DTFSR BLKSI ZE=80,DEVADDR = SYSLST, DEVICE=PRI NTER , I0AREA1 = RDCARD, * 

TYPEFLE=OUTPUT 

DTFEN 

* 

* BSC FILE DEFINITION SECTION 



BASE 


DTFRF 


BEGIN, 3 




BSCFILE 


OTFBS 


DEVADDR=SYS002, 


AREA=WTAR EA,LENGTH= WTLEN, BSCFLAG=ERRFLG, 






RC0UNT=7 




* INITIALIZATION — OPEN'S AND 


BOPEN 


BEGIN 


BALR 


REG6.0 






USING 


*.REG6 






OPEN 


RDFILE, WTFILE 






BOPEN 


DTFNAME=BSCFILE 


, I NTRFC=B , D I AL=NO 




WAIT 


BSCFILED 






TM 


ERRFLG,X«80» 


TEST FOR NORMAL COMPLETION OF BOPEN 


* 


BZ 


ERPT 


NO ERRPT EXIT YES CONTINUE 


* SET 


UP BSC CCB FOR WRITE (AND READ) OPERATION 




L 


REG5, THREE 


SET UP REGISTER FOR RETRY LOOP 




LA 


REG4, SDCARD 


SET UP AREA ADDRESS FIELD OF CCB 




ST 


REG4,WTAREA 


WITH DATA AREA ADDRESS 




LH 


REG4, LENGTH 


SET UP LENGTH FIELD OF CCB WITH 




STH 


REG4, WTLEN 


DATA LENGTH 


* REQUEST PERMISSION OF REMOTE CPU TO SEND (CNTRL ENQ) 


ENQSND 


CNTRL 


BSCFILE, ENO 






WAIT 


BSCFILED 






TM 


ERRFLG,X*80« 


TEST FOR NORMAL COMPLETION OF CNTRL 




BO 


PROCEOE 


YES CONTINUE NO 




TM 


ERRFLG,X«22« 


TEST FOR MESSAGE FORMAT ERROR AND 


* 






UNEXPECTED RESPONSE 




BO 


CHK1 


BOTH CONDITIONS — CONTINUE CHECKING 




LA 


REG7, ENQSNO 


SET UP RETURN ADDRESS FOR TIME OUT 



Figure 63. (Part 1 of 3) 
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a 
O 




ANT U 1 HEK "~EI\l\Ur\ CA1I 


CHK1 


TM 


ERRFLG+ltX»08« 


WAS UNEXPT. RESP. AN ENQ (CONTENT I ON 




BO 


READ 


YES— TRY A READ NO- 




TM 


ERRFLG+1,X«02« 


WAS THE UNEXPT. RESP. AN EOT 




BO 


ENDOJ 


YES END OF JOB NO 




TM 


ERRFLG+l.X'Ol' 


WAS THE UNEXPT. RESP. A WABT 




BZ 


ERR0R1 






BCT 


REG5 tENQSND 


YES RETRY THE CNTRL ENQ 


* 


B 


EWABT 


STILL GETTING WABT WABT EXIT 


* GET A 
* 


RECORD FROM THE CARD READER — SEND IT TO CPU-B (REMOTE) 


PROCEDE 


L 


REG5, THREE 


RESET REGISTER FOR RETRY LOOP 




TM 


PGMSWtX'Ol* 


WAS THE CNTRL ENQ REISSUED BY THE 


* 






WRITE ROUTINE 




BO 


SNDCD 


YES — SKIP GETTING A NEW RECORD 


RDACD 


GET 


RDFILE 


GET A RECORD FROM THE CARD REAOER 


SNOCO 


WRITE 


BSCFILE tBSC»TT 


SEND IT WRITE-TYPE IS •CONTINUE* 




WAIT 


BSCFILED 






TM 


ERRFLGtX»80» 


TEST FOR NORMAL COMPLETION OF WRITE 




BO 


RDACD 


YES — GET ANOTHER RECORD TO SEND NO 




TM 


ERRFLGt X' 22* 


TEST FOR MESSAGE FORMAT ERROR ANO 


* 






UNEXPECTED RESPONSE 




BO 


CHK2 


BOTH CONDITIONS — CONTINUE CHECKING 




LA 


REG7, SNDCD 


SET UP RETURN ADDRESS FOR TIMEOUT 




B 


ERROR 


ANY OTHER — ERROR EXIT 


CHK2 


TM 


ERRFLG+l,X«02« 


WAS THE UNEXPT. RESP. AN EOT 




BO 


ENDOJ 


YES — END OF JOB NO 




TM 


ERRFLG+1»X«01' 


WAS THE UNEXPT. RESP. A WABT 




BZ 


ERR0R1 


NO ERROR EXIT YES — 




01 


PGMSW,X«01» 


SET SWITCH TO RESENO THIS RECORD 




BCT 


REG5 tENQSND 


SEND ENQ AGAIN 


* END-OF-FILE- 


SEND EOT (CNTRL 


EOT) AND PREPARE TO RECEIVE ENQ 


* (CNTRL PREPARE) 




EOT 


CNTRL 


BSCFILE.EOT 






WAIT 


BSCFILED 






TM 


ERRFLG»X»80< 


TEST FOR NORMAL COMPLETION OF CNTRL 




BZ 


ERR0R1 


NO — ERROR EXIT YES — 


PREPARE 


READ 


BSCFILE,BSC»TQ 






WAIT 


BSCFILED 






TM 


ERRFLCX'BO* 


TEST FOR NORMAL COMPLETION OF CNTRL 




BO 


READ 


YES— CONTINUE NO — 




TM 


ERRFLGtX* 22 1 


TEST FOR MESSAGE FORMAT ERROR AND 


* 






UNEXPECTED RESPONSE 




BO 


CHK3 


BOTH CONDITIONS— CONTINUE CHECKING 




LA 


REG7, PREPARE 


SET UP RETURN ADDRESS FOR TIMEOUT 




B 


ERROR 


ANY OTHER— ERROR EXIT 


CHK3 


TM 


ERRFLG+ltX»02« 


WAS THE UNEXPT. RESP. AN EOT 




BO 


ENDOJ 


YES — NORMAL END OF JOB 




8 


ERROR 1 


NO — ERROR EXIT 



* RECEIVE A RECORO AND PRINT IT USING SAME DATA AREA AND LENGTH 

READ READ BSCFILE.BSC ,TN RECEIVE A RECORD— READ-TYPE CONTINUE 



Figure 63. (Part 2 of 3) 
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WAIT 


BSCFILED 






TM 


ERRFLG,X»80» 


TEST FOR NORMAL COMPLETION OF READ 




LA 


REG7.READ 


SET UP RETURN ADDRESS FOR TIMEOUT 




BZ 


ERROR 


NO — ERROR EXIT YES — 




TM 




TCCT cflD cnT DPfFT WCPI U T TM MDD M A 1 
■ Col rUK tUI KcLcl VtU W X 1 n liUKnAL 








P OMPI PT f HM 
LunrLCI 1 Uvi 




BO 


ENDOJ 


yp<j~ mdrmai PMn op inn 




PUT 

r U 1 


WTF ILE 


wn— print tup Rprnpn 


* 


3 


READ 


R FT FT VP ANnTHFR Rprnpn 


* ERROR 
* 


EXIT 






ERROR 


TM 


ERRFLG,X«40« 


TEST FOR I/O ERROR 




B2 


PRRflRl 


NO— FX IT YF^—— 

I1U [-All ICO 




TM 




TF1T F/1R TIMFflllT 




BO 


T I MFfHlT 


VF ^-n—Cn TD RflllTINF Fl ^F 




MSG 


ERR 


I^CIIC IMftTTATIVF MF^CARF 


* 


Q 
D 




^Fhin am enx f Mm ir at t Mr cun nc inn 


* TIME 
* 


OUT 






TIMEOUT 


TM 


PGMSW.X'IO* 


HAS TIMEOUT BEEN RETRIED 




BO 


*+10 


V P ^ cjf TT 

I Co C A 1 • 




01 


PGMSW»X*10* 


NO — TURN ON SWITCH INDICATING RETRY 




BR 


REG7 


RETRY 




MSG 


TIME 




* 


B 


ENDOJB 




* WABT 
* 


EXIT 






EWABT 


MSG 


WABT 


T^llIF INinirATIVF MF^AfiF 




B 


ENOOJB 


fin m pun np inR 


* NORMAL END-OF-JOB EXIT 




EN0OJ 


MSG 


EOJ 


ISSUE EOJ MESSAGE 


ENOOJB 


EQU 


* 






CLOSE 


RDFILEt WTFILE 


CLOSE THE FILES 




BCLOS 


BSCFILE 






WAIT 


BSCFILED 




ERPT 


ERRPT 


BSCFILE 




* 






PRINT THF FRRPIR ^TATT^TIT^ 


* 


EOJ 






* REGISTER EQUATES 




REG4 


EOU 


4 


unoie QPrrcTco 

HUKIV KcololtK 


REGS 


EQU 


5 


UOONT— CONTROLLED LOOP Rc6I5TfcK 


REG6 


EQU 


6 


BASE REGISTER 


REG7 


EQU 


7 


TIMEOUT RETURN ADDRESS 


* CONSTANTS 






THREE 


DC 


F«3« 


1 DDD milMT 
LUUr LUUm 


SOCARO 


DC 


X«02« 


STX 


ROCARD 


OS 


CL80 


DATA AREA 




DC 


X^OB* 


ETX 


LENGTH 


DC 


H«82« 


DATA LENGTH 


PGHSM 


DC 


X'OO' 


PROGRAM SWITCH— CONTROLS EXIT FROM 


* 

* 






WABT LOOP 




END 


BASE 





// END 



Figure 63. (Part 3 of 3) 
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// JOB ASSEMBLER 
// DATE 67130 

// VOL SYSOO0.WORK1 

// OLAB •BOS 8K DISK 11I1111*, * 

0001 ,65099, 65099 , • 0000000000000 • 
// XTENT 1,000, 0116000, 0195009, • 1 111 1 !• , SYSOOO 

// EXEC 

AOPTN ENTRY 
REPRO 

PHASE TESTA, S 

TITLE 1 SAMPLE PROGRAM - CPU-B* 
START X»1F08« 

* FILE DEFINITION SECTION — PRINTER AND CARD READER 

DTFBG DISK 

RDFLE DTFSR BLKSIZE=80,OEVA0DR=SYSIPT,DEVICE=READ4O, EOFADDR=ENDOJ, * 

I0AREA1=WTCAR0,TYPEFLE=INPUT 
VfTFLE DTFSR BLKSIZE=80» DEVADDR=SYSLST,DEVICE=PRI NTER, I0AREA1=WTC ARD»* 

TYPEFLE=OUTPUT 

DTFEN 

* 

* BSC FILE DEFINITION SECTION 
♦ 

BASE DTFRF BEGIN, 3 

BSCFLE DTFBS DEVA0DR=SYS002, ARE A=RDAREA,LENGTH=RDLEN, BSCFLAG*ERRFG, * 
RC0UNT=7 

* 

* INITIALIZATION— OPEN* S AND BOPEN 
* 

BEGIN 



BALR 


REG6.0 




USING 


*,REG6 




OPEN 


RDFLE, WTFLE 




BOPEN 


DTFNAME=BSCFLE, INTRFC=B,DIAL»NO 


WAIT 


BSCFLED 




TM 


ERRFCX^O' 


TEST FOR NORMAL COMPLETION OF BOPEN 


BZ 


ERPT 


NO ERRPT EXIT, YES CONTINUE 


UP BSC 


CCB FOR READ (AND 


WRITE) OPERATION 


L 


REG5, THREE 


SET UP REGISTER FOR RETRY LOOP 


LA 


REG4, STCARO 


SET UP AREA ADDRESS FIELD OF CCB 


ST 


REG*, RD AREA 


WITH DATA AREA ADDRESS 


LH 


REG4, LENGTH 


SET UP LENGTH FIELD OF CCB WITH 


STH 


REG4, ROLEN 


OATA LENGTH 


ARE TO 


READ BY RECEIVING 


ENO FROM REMOTE CPU 


CNTRL 


BSCFLE, PRP 




WAIT 


BSCFLED 




TM 


ERRFG.X^SO* 


TEST FOrt NORMAL COMPLETION OF CNTRL 


BO 


READ 


YES — CONTINUE NO — 


TM 


ERRFG,X«2Z» 


TEST FOR MESSAGE FORMAT ERROR AND 






UNEXPECTED RESPONSE 


BO 


CHCK1 


BOTH CONDITIONS' — CONTINUE CHECKING 


LA 


REG7, PREPARE 


SET UP RETURN ADDRESS FOR TIMEOUT 



Figure 6 4. (Part 1 of 3) 
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B 


ERROR 


A iiu nTurn r nnnn cvtt 

ANY OTHER — ERROR EXIT 


CHCK1 


TM 


ERRFG+ltX'OZ* 


WAS THE UNEXPT. RESP. AN EOT 




BO 


ENQSND 


YES — GO TO WRITE 


* 


B 


ERROR1 


NO ERROR EXIT 


* RECEIVE A RECORD AND PRINT 


IT 


READ 


READ 


BSCFL E » BSC t TN 


RECEIVE A RCD FROM CPU-A READ-TYPE 


* 






CONTINUE 




WAIT 


BSCFLED 






TM 


ERRFG.X'SO* 


TEST FOR NORMAL COMPLETION OF READ 




LA 


REG7.READ 


SET UP RETURN ADDRESS FOR TIMEOUT 




BZ 


ERROR 






TM 


ERRFG+ltX'02 1 


TEST FOR EOT RECEIVEO WITH NORMAL 


* 






COMPLETION 




BO 


ENQSND 


YES — BEGIN SENDING RECORDS 




PUT 


WTFLE 


NO — PRINT THE RECORD 


Ik 


B 


READ 


RECEIVE ANOTHER RECORD 


* REQUEST PERMISSION OF REMOTE CPU TO SEND (CNTRL ENO) 




CNTRL 


BSCFLEtENQ 






WAIT 


BSCFLED 






TM 


ERRFG,X»80« 


ICol rUK iMUKnAL UUnrLtllUN UP UNI KL 




BO 


PROCEDE 


in 1 bum tnut nu — 




TM 


ERRFG,X»22« 


TCCT CUD HCCCAPC CflDUAT CDDHD A tin 

(Col rUK ntooAbc rUKHA 1 CKKUK ANU 








UncArCUI CU KCoruNjC 




BO 


CHCK2 


BOTH CONDITIONS — CONTINUE CHECKING 




LA 


REG7, ENQSND 


SET UP RETURN ADDRESS FOR TIMEOUT 




B 


ERROR 


ANY OTHER— ERROR EXIT 


CHCK2 


TM 


ERRFG*-l,X«08« 


WAS UNEXPT. RESP. AN ENQ( CONTENT I ON ) 




BO 


ENDOJQ 


YES — END THE JOB NO — 




TM 


ERRFG+l,X«02 f 


WAS THE UNEXPT. RESP. AN EOT 




BO 


ENDOJ 


YES — NORMAL END OF JOB NO — 




TM 


ERRFG+1,X«01» 


WAS THE UNEXPT- RESP. A WABT 




BZ 


ERROR 1 


NO — ERROR EXIT 




BCT 


REG5, ENQSND 


YES — RETRY THE CNTRL ENQ 


* 


B 


EtfABT 


STILL GETTING WABT— WABT EXIT 


* GET A 


RECORD FROM THE CARD 


READER — SEND IT TO CPU-A (REMOTE) 


PROLcOE 


L 


REG5 f THREE 


RESET REGISTER FOR RETRY LOOP 




MVI 


STCARD^'OZ* 


RESTORE THE STX CHARACTER 




TM 


PGMSW,X«01« 


WAS THE CNTRL ENQ REISSUED BY THE 


* 






WRITE ROUTINE 




BO 


SNOCD 


YES — SKIP GETTING A NEW RECORD 


RDACD 


GET 


RDFLE 


GET A RECORD FROM THE CARD READER 


SNDCO 


WRITE 


BSCFLE,BSC t TT 


SEND IT WRITE-TYPE IS "CONTINUE* 




WAIT 


BSCFLED 






TM 


ERRFCX^O' 


TEST FOR NORMAL COMPLETION OF WRITE 




BO 


RDACD 


YES— GET ANOTHER RECORD TO SEND NO- 




TM 


ERRFG, X»22« 


TEST FOR MESSAGE FORMAT ERROR AND 








UNEXPECTED RESPONSE 




BO 


CHCK3 


BOTH CONDITIONS — CONTINUE CHECKING 




LA 


REG7,SNDCD 


SET UP RETURN ADDRESS FOR TIMEOUT 




B 


ERROR 


ANY OTHER— ERROR EXIT 



Figure 6 4. (Part 2 of 3) 
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CHCK3 


TM 


ERRFG+1,X«02« 


WAS THE UNEXPT. RESP. AN EOT 




BO 


ENDOJ 


YES — END OF JOB NO — 




TM 


ERRFG+1 f X ' 0 1 ' 


WAS THE UNEXPT. RESP. A WABT 




BZ 


ERR0R1 


NO — ERROR EXIT YES — 




01 


PGMSWtX' 01 1 


SET SWITCH TO RESEND THIS RECORD 


* 


BCT 


REG5 f ENQSND 


SEND ENQ AGAIN 


* CONTENTION 


EXIT 




ENDOJQ 


MSG 


CENQ 


ISSUE INDICATIVE MESSAGE 


* 


B 


ENDOJ B 


SEND AN EOT INDICATING END OF JOB 


* ERROR 

* 


EXIT 






ERROR 


TM 


€RRFGtX , 40« 


TEST FOR I/O ERROR 




82 


ERROR! 


NO — EXIT YES — 




TM 


BSCFLED+3*X'02* 


TEST FOR TIMEOUT 




BO 


TIMEOUT 


YES — GO TO ROUTINE ELSE 


ERROR1 


MSG 


ERR 


ISSUE INDICATIVE MESSAGE 




B 


ENDOJB 


SEND AN EOT INDICATING END OF JOB 


* TIMEOUT 






TIMEOUT 


TM 


PGMSWf X* 10* 


HAS TIMEOUT BEEN RETRIED 




BO 




YES — EXIT NO — 




01 


nr uci i v I 1 A i 

PGMSWf X» 10 1 


1UKN UN SW11LH 1NU1LAI1N0 KfcTKY 




BR 


REG7 


GO TO RETRY 




MSG 


TTur 

1 1 Mfc 




* 


B 


ENDOJB 




* WABT 
* 


EXIT 






EW A8T 


MSG 


WABT 


ISSUE INDICATIVE MESSAGE 


* 


B 


ENDOJB 


GO TO END OF JOB 


* NORMAL END- 
* 


OF-JOB EXIT 




ENDOJ 


MSG 


EOJ 


ISSUE EOJ MESSAGE 


ENOOJB 


CNTRL 


BSCFLEt EOT 


SEND AN EOT 




WAIT 


BSCFLED 






CLOSE 


RDFLEiWTFLE 


CLOSE THE FILES 




BCLOS 


BSCFLE 






WAIT 


BSCFLED 




ERPT 


ERRPT 


BSCFLE 




* 






PRINT THE ERROR STATISTICS 


* 
* 


EOJ 






* REGISTER EQUATES 




REG4 


EQU 




WORK REGISTER 


REG5 


EOU 




COUNT— CONTROLLED LOOP REGISTER 


REG6 


EQU 


6 


BASE REGISTER 


REG7 


EQU 


7 


RETURN AODRESS FOR TIMEOUT 


* CONSTANTS 






f- 

THREE 


DC 


F« 3* 


LOOP COUNT 


STCARD 


OC 


X»02« 


STX 


HTCARO 


OS 


CL80 


DATA AREA 




DC 


X»03» 


ETX 


LENGTH 


DC 


H«82« 


DATA LENGTH 


PGMSW 


DC 


X«00« 


PROGRAM SWITCH— CONTROLS EXIT FROM 


* 
* 






WABT LOOP 




END 


BASE 





// END 



Figure 64. (Part 3 of 3) 
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PART 4 - BOS /BSC SUPPORT C H ANNEL PROGRAMS 

The BOS/BSC Support channel programs (CCW 
lists) set up by BSC macros to facilitate 
the sending and receiving of data to and 
from a remote CPU follow. Por a 
description of each macro and/or type 
operation, refer to Binary Synch r onous 
Communication . 

These command seguences may be useful to 
the problem program which must interface 
with some other BSC support, such as DOS 
BTAM BSC. 



IBCLOS Macro 



| channel commands 



| Disable 
| Set Mode 



READ Macro 



The appropriate channel program for RSAD is 
set up according to the type-code spec- fied 
on the READ macro instruction. 



BOPEN Macro 

Using the DIAL keyboard operand coded on 
the BOPEN macro instruction, one of the 
following BSC channel programs is set up. 



| DIAL operand 


T — 1 

| channel commands | 


| DIAL=YES 


| Disable | 
| Set Mode j 


|DIAL=NO 


| Disable | 
| Set Mode j 
| Enable | 

J. | 


IDIAL Macro 




Using the parameters on the IDIAL macro 
instruction and the problem 
program-supplied IDLST, one of the 
following BSC channel programs is set up. 


i 

IDIAL operands 


1 1 

| channel commands | 


DIAL-ANS or 
DIAL=MAN and 
OPTYPE=RD 


| Enable | 
| READ [RCVID] ENQ | 
| WRITE [SNDID] ACK-0 | 
| READ data | 


DIAL=CALL and 
OPTYPE=WT or 
DIAL=MAN and 
OPTYPE=WT 


j Dial or Enable | 
| WRITE [SNDID] ENQ | 
| READ [RCVID] ACK-0 | 
| WRITE data | 
| READ response j 


DIAL=CALL and 
OPTYPE=WTX or 
DIAL=MAN and 
OPTYPE=WTX 


| Dial or Enable | 
| WRITE [SNDID] ENQ | 
| READ [RCVID] ACK-0 | 
| WRITE data | 
| WRITE DLE ETX | 
| READ response | 
■ i 


BCLOS Macro 



The following BSC channel program is set 
up. 



r 

| Type-code 


T " 1 " T 

| channel commands | 


| 

| TN (Continue) 
1 


| WRITE ACK | 
| READ data | 


J 

|TP (Repeat) 

1 


| WRITE NAK | 
j READ data | 


1 

| TG (Continue with 
jleading graphics) 
1 


| WRITE graphics | 
| WRITE ACK | 
j READ data j 


| 

j TL (Repeat with 
jleading graphics) 
1 


j WRITE graphics | 
| WRITE NAK | 
| READ data | 


1 

| TQ (Inguiry) 
i 


| READ ENQ | 
i ■ 


WRITE Macro 




rne appropriate channel program for WRITE 
is set up according to the type-code 
specified on the WRITE macro instruction. 


i 

| type-code 


l i 

| channel commands | 


i 

| TT (Continue) 

1 


| WRITE data | 
| READ response | 

h ^ 


1 

|TC (Conversational) 

1 
1 


| WRITE data | 
j READ data (or j 
| response) | 


f 

|TX (Transparent 

|Text) 

1 


| WRITE data | 
| WRITE DLE ETX | 
| READ response | 


1 

|TXB (Transparent 

| Block) 

1 


| WRITE data | 
| WRITE DLE ETB | 
j READ response | 


I 

|TV (Transparent 
| Conversational) 
1 
1 

i . ._ ,_ _ 


| WRITE data | 

| WRITE DLE ETX | 

| READ data (or | 

| response) | 
• ■ 
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CNTRL MACRO 



PART 5-BOS/BSC TP OP CODES 



For each operation type (code parameter on 
the CNTRL macro instruction) the 
appropriate channel program is set up. 



1 ' — ■■" 

loperation type 

j 


— r - i 

| channel commands | 


| WABT (Wait before 

(Transmitting) 

1 


J WRITE WABT | 
| Prepare | 
| READ response | 


1 

|PRP (Prepare) 
1 

j 


| Prepare | 
1 READ response | 


| ENQ (Inguiry 
1 


| WRITE ENQ | 
j READ response | 


1 

|DSC (Disconnect) 

1 


| WRITE Disconnect j 
| (DLE EOT) | 


1 

|EOT (leased line) 

I — 


| WRITE EOT | 


j EOT (dial line) 
1 


| WRITE EOT | 
| READ response | 



BOS/BSC support uses bytes 40-47 of the 
channel command word (CCW) , which are 
normally not used, for a "TP op code", 
indentifying to PIOCS the operation being 
performed by the command. 



1 

|TP 


i 

CODE | 


- ■ ■ — i 

MEANING | 


|X' 


01 « | 
j 


Prepare, Enable, Dial, or j 
Disable command | 


|X' 


02' | 


WRITE special characters: DLE | 
ETB, DLE ETX, graphics, or WABT | 


IX' 


03' | 


WRITE [ ID ] ENQ | 


IX' 


04' | 


WRITE [ ID ] ACK-0 | 


|X ' 


05' | 


READ response to CNTRL ENQ -or j 
EOT | 


|X ' 


07' | 


READ [ID] ACK-0 | 


|X» 


09' | 


WRITE response to text or ENQ | 


IX" 


11' | 


READ or WRITE text j 


IX' 


20' | 


READ response to text | 


|X« 


21 ' | 


WRITE EOT, DLE EOT, Set Mode | 


|X« 


24« | 


READ ENQ (READ TQ or READ | 
response after Prepare) | 


|X' 


31 ' | 


READ Skip - error recovery j 


|X' 


32' | 


WRITE ENQ - error recovery j 


|X'34« | 


READ ENQ - error recovery j 


IX' 


35' | 


WRITE DLE ENQ - error recovery j 


|X'39' | 


WRITE NAK or current SNDACK - | 
error recovery j 
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A-Type Address Constant 43 

ABORT 180 
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Absolute Expressions - 18 
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ADAREX (DTFIS) 107,158 

ADD (DTFIS IOROUT) ,. 107,162 

Adding Records to a File (by DAM) 92 
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Addressing Dummy Sections.. 25 

Addressing External Control Sections... 27 
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Address, Explicit 20,30 

Address, Implied. 20,30 

ADDRTR (DTFIS IOROUT) 107,162 

AFILE Card 193 

AFTER (DTFDA) . .. 92,95, 152 

Alignment, Boundary 20, 35,38 

Alignment, Forcing with DS Statement... 45 

Alignment, Instruction 29 

ALL (DTFPH MOUNTD) 67,172 

ALOG Card 192 

Alternate Tape Drive Nonstandard Labels 

(Tape) 71 . 

ALTTAPE (DTFSR) 139 

Ampersand 15,38 
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Appendix A: Character Codes 197 

Appendix B: Machine-Instruction 
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Appendix J: Assembler Diagnostic 
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Appendix L: Blank, Substitute Blank, and 
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Appendix M: Binary Synchronous 

Communication 256 

AREA (DTFBS) 167 

AREA (DTFSN) 165 



Areas for Consecutive Processing, 

Storage 75 

Areas for DAM, Storage 89 

Areas for ISFMS, Storage 96, 106, 161, 164 

Area, Cylinder Overflow (ISFMS) 101 

Area, Defining Fields of 45 

Area, Independent Overflow (ISFMS) 103 

Area, Overflow (ISFMS) 101 

Assemble a Supervisor, 

Organization to 182,188 

Assembler. 5, 23 , 34 

Assembler File (AFILE) 193 

Assembler Instruction Statements. . .5, 34, 21 1 

Assembler Log (ALOG) 192 

Assembler Option (AOPTN) 192 

Assembler Workarea (AWORK) 193 

Assembler Languages — Features 

Comparison Chart.. 230 

Assembler-Language Structure 11 

Assembler-Language Subset Relationship. 195 
Assembler-Language Coding Conventions.. 8 

Assembling 5,183 

Assembling the Job Control Program 191 

Assembly 5,23 

Assembly of the Macro 55 

ASSGN 144 

Asterisk 15 

AWORK Card 193 



BACK (DTFSR READ) 148 

Backspace to Interrecord Gap (BSR) . . . . 83 , 85 

Backspace to Tape Mark (BSF) 83,85 

Backwards, Read Tape 69,77, 132 

Base Address........ 6 

Base Register.. ...6,20,23 

Base Register Address Calculation 6,20 

Base Register Instructions 20 

Base-Displacement Form of Addresses. ... 6 
Basic Programming Support Relationships 6 
BCLOS Macro, for BSC Support .... 1 24, 136, 252 

Begin Column... 8 

Begin Literal Pool..- 50 

Begin-Def inition Card (DTFBG) 137,138 

Binary Constant - B 39 

Binary Self-Defining Term 14 

Binary Synchronous 

Communication. 116, 166, 256 

BLKSIZE (DTFDA) 152 

BLKSIZE (DTFSR) 142 

Block Count for Checkpoint Records. . 1 30, 132 

Block-Length Field , 74 

Blocked Records (for Consecutive) . 72, 78, 148 

Blocked Records (for DAM) 89,156 

Blocked Records (for ISFMS) . 106, 107, 1 1 1, 163 

BOPEN Macro, for BSC Support 67, 117,252 

Boundary Adjustment ...20,29,44 

Boundary Alignment for Constants 35,38 

BSC Support, Expanded CCB 126,166 

BSC Support, File Definition Macros.... 166 
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BSC Support, Imperative Macros......... 116 

BSC Support, Line Control 116 

BSF (Backspace to Tape Mark) .83,85 

BSR (Backspace to Interrecord Gap) . . . . 83, 85 
Building Records in the Output Area. ... 77 
Building Records in a Work Area 79 

Capacity Record (for DAM) 92 

Card Error 144 

Card File (CLOSE) 136 

Card Read-Punch (IBM 2540) , 

CNTRL for, 85 

Card Read-Punch (IBM 1442 or 2520), 

CNTRL for 86 

Card Record Maximum Size 75 

Carriage Channel 9 Punch 88,187 

Carriage Control, Printer 79,83 

Carriage Skip (SK) 85 

Carriage Space (SP) 85 

CCB Macro 125 

CCB, Expanded for BSC 126 

CCB, Expanded for STR 165 

CCW - Define Channel Command Word. . . . 46, 21 1 

CDCNV Macro 115 

Channel Command Words (CCW) 46,145 

Channel Configuration Supported by IOCS 56 

Character Constant -C- 38 

Character Self -Defining Term 15 

Character Set.... .11,197 

Checking Alignment ., 29 

Checking User Standard Labels (Disk)... 68 

Checkpoint Records 85, 130, 136, 142 

CHECKPT (DTFSR) 142 

CHKPT Macro 130,184 

CHNG Macro 87,129 

CKPTREC (DTFSR) 131,142 

CLOSE Macro 135, 180 

Closed File, Reopening a 135 

CMBND (DTFSR TYPEFLE) ..77,79, 150 

CNOP - Conditional No Operation 51,211 

CNTRL Macro 83,85,95 

CNTRL, for BSC Support. ....... 84,87, 1 16,252 

CNTRL, for STR Devices... 115 

Code Conversion (CDCNV) Macro 115 

Code-Translation Table . 197 

Codes, Extended Mnemonic 32 

Codes, Machine-Instruction 31 

Codes, Operation... 5,10 

Coding Conventions 8,17 

Coding Form f 8 

Combined File (CMBND) 77 

Command Control Block (CCB) 69,125 

Comments Entries 10 

Communication, Operator . . 173, 1 75, 18 1 

Communication Region (COMRG) 173 

Compatibility 5 

Completion 132 

Complex Relocatable Expressions 43 

COMRG Macro 174,177 

Conditional No Operation - — CNOP 51 

CONFG (SUPVR Macro) . .. 184 

Consecutive Processing .....57, 71,138 

Console (DTFSR DEVICE) 145 

Constants, Address. 42,223 

Constants, Decimal (P and Z) 42,223 

Constants, Defining.. 35 



Constants, Exponent Modifier 37 

Constants, Fixed-Point (F and H) . . 37 , 40, 223 
Constants, Floating-Point (E and D) . . 41, 223 

Constants, Length Modifier 37 

Constants, Multiple .35,38 

Constants, Operand Subfield 1: 

Duplication Factor 36 

Constants, Operand Subfield 2: 

Type , 36 

Constants, Operand Subfield 3: 

Modifiers 36 

Constants, Operand Subfield 4: 

Constant. 38 

Constants, -Scale Modifier.... 37 

Constant, Binary (B) 39,223 

Constant, Character (C) 38,223 

Constant, Hexadecimal (X) 39,223 

Continuation Cards, Macro 

Instruction 54, 138 

Continuation Indicator Column, 

Macro Instruction. ..54,138 

Continuation Lines........ 8 

Continue Column 8 

Continue Column, Macro Instruction 54 

Control Cards ..68,192 

Control Character 144 

Control Dictionary 26 

CONTROL (DTFDA) 152 

CONTROL (DTFSR) .83, 142 

Control Instructions, Program... 48 

Control Section, First.. 24 

Control Section, Unnamed.... 25 

Control Section Location Assignment.... 24 

Control Sections... 6,23,60 

Control Sections, External (Addressing) 27 

Control, Input/Output 55 

Control, Punch and Printer..., 79 

Conversion Table, Decimal-Hexadecimal 

Numbers......... 214 

Core Image Library 174 

COREXIT (DTFSR) 142 

Count Area (DAM) 92 

CR (EXIT Macro) 175 

CR (SUPVR Macro). 184 

CRDERR (DTFSR) 144 

Creating a File or Adding Records to 

a File (by DAM) .. t 92 

CSECT - Identify Control Section 25,211 

CTLCHR (DTFSR) 144 

Cylinder Index 99,105 

Cylinder Overflow Area (ISFMS) 103 

CYLOFL (DTFIS). 103,158 

CYNDEX (DTFIS)..... 105,158 

Data Area (DAM) , 92 

Data Conversion Special Feature 77,131 

Data Definition Instructions...,, 35 

DC - Define Constant 35 

Decimal Constants - P and Z... 42 

Decimal Self-Defining Term 14 

Declarative File-Definition Macro 59 

Defining Fields of an Area 45 

Defining Symbols 13 

Definitions, Literal.... 36 

Definitions, Macro , 53 

DERREX (DTFIS) 158 



268 S/360 BOS Assembler with I/O Macros 



Detail Entry, File Definition Macro 

Instruction 138 

DEVADDR (DTFBS) , 167 

DEVADDR (DTFPH) 171 

DEVADDR (DTFSN) 165 

DEVADDR (DTFSR) ....139,144 

DEVICE (DTFDA) 152 

DEVICE (DTFSR) 144 

Diagnostic Messages 245 

DIALO Macro, for STR Devices .59,114 

Digits, Hexadecimal. 15 

Digits, Numeric , 11 

Direct Access Method (DAM) .... 58,88, 138, 151 

Disk11 (DTFDA DEVICE) . 152 

Disk11 (DTFSR DEVICE) 145 

Disk End-of-Volume 133 

Disk Error, Uncorrectable..... 158 

Disk File, CLOSE.... 135 

Disk File, Creating a (by DAM) 92 

Disk File, Cylinder Index Area of 

(ISFMS) 105 

Disk File, Macro Instruction tc Load or 

Extend by ISFMS 105 

Disk File, Master Index Area of (ISFMS) 105 

Disk File, Prime Area of {ISFMS) 105 

Disk File, Reopening a 67,135 

Disk (SUPVR Macro) 184 

Disk Input File 67,133,145 

Disk Labels. 63 

Disk Labels, User Trailer 133 

Disk Output File ..68,133,147 

Disk Record Indices (for ISFMS) 97 

Disk Records, Organization of 

(for ISFMS) 96 

Disk Records, Processing Consecutively. 72 
Disk Records, Processing by the 

Direct Access Method ..58,88 

Disk Records, Processing by ISFMS 96 

Disk Storage Drive (IBM 2311), 

CNTRL Macro for 86 

Disk Workarea 7 

Displacement 6,18 

DLAB (Job Control Card) 67,107 

DROP - DROP Base Register 22,211 

DS - Define Storage 44,211 

DSECT - Identify Dummy Section. .. 25, 2 1 1, 224 

DSKXTNT (DTFIS) 160 

DSPLY Macro 82 

DTAREX (DTFIS)... 105,160 

DTFBG Macro 137,138 

DTFBS Macro, for BSC Support 60, 138,166 

DTFDA Macro.. 59,88, 138, 151 

DTFEN Macro 138 

DTFIS Macro 59,96, 138, 158 

DTFPH (Macro Instruction) 60,171 

DTFRF Macro, for BSC Support 166 

DTFRF Macro, for STR Processing. .60, 1 12, 170 
DTFSN Macro, for STR 

Processing 60., 112, 138, 165 

DTFSR Macro 59, 138,139 

Dummy Section Location Assignment 25 

Dummy Sections, Addressing 25 

DUMP Macro..... 174,180,182 

Duplication Factor, Special Uses of.... 45 

Duplication Factor for Constants 36,45 

DUPREX (DTFIS Duplicate-Record 

Check) 107, 160 



EBCDIC Codes 10, 150 

EF (End-of-File) 134 

EJD 86 

EJECT - Start New Page 47,211 

END - End Assembly ...52,211 

End Assembly 52 

End Column 8 

End File Load Mode 106 

End Set Limit (ESETL) 110 

End-of-Def inition Card (DTFEN) 138 

End-of-File 132, 134 

End-of-File Detection 145 

End-of-File Record (Disk) 107,133 

End-of-Job (EOJ) 182 

End-of-Volume, Disk 132 

End-of-Volume, Forced (Tape) 134 

ENDFL Macro 105, 106 

Entries, Comments 10 

Entries, Name 10 

Entries, Operand 10 

Entries, Operation 10 

ENTRY - Identify Entry-Point Symbol. . 27, 21 1 

Entry Cards * 138 

EOF. 132, 134 

EOF1 (Tape Label Identifier) 65,136 

EOF (DTFSN).. 115 

EOFADDR (DTFIS) .133,161 

EOFADDR (DTFSR).... ..133,145 

EOJ Macro 174, 182 

EOV 132, 134, 139 

EOV1 (Tape Label Identifier) 65 

EQU - Eguate Symbol 13,34,211 

Erase Gap (ERG - Write Blank Tape) 83 

ERRBYTE (DTFDA Error Status Byte) . . . . 95, 154 

ERROPT (DTFSR).... 145 

Error Condition, Retry for Parity...... 145 

Error Condition, Uncorrectable (Disk).. 154 

Error Indications .6,143 

ERRPT Macro, for BSC Support .... 1 24, 1 82, 252 

ESETL Macro.... 110 

EV (End-of-Volume) 134 

Evaluation of Expressions 17 

Example of an Organized File (by ISFMS) 103 

Example of IOCS (Appendix G) 224 

EXCP Macro (Execute Channel 

Program) 69, 129, 174 

EXIT Macro 174, 1 75 

Explicit Address. 20,30 

Exponent Modifier for Constants 37 

Expressions. 13, 17 

Expressions", Absolute 18 

Expressions, Coding of 17 

Expressions, Complex Relocatable t 43 

Expressions, Evaluation of 17 

Expressions, Relocatable 18 

Expression, Multiterm 17 

Expression, Single Term. 17 

Extend a Disk File by ISFMS, 

Macro Instructions to 105 

Extended Mnemonic Codes 32 

External Control Sections, Addressing.. 27 

External Signal 173 

External Symbol Dictionary (ESD) 192 

EXTRN - Identify External Symbol 27,211 
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FEOV Macro, Tape Records 134,137 

FETCH Macro... 174,175 

Fields, Defining 45 

Field, Identification-Sequence 11 

FILABL (DTFSR). .a. ...65, 146 

File Definition Macros 59,137 

File Header Label, Standard (Tape) 65 

File Limits (Disk)......... 63 

File Trailer Label, Standard (Tape).... 65 

Filename3 Field... 109 

FilenameB Field 136 

Filenames Field. 106 

Filenames (File Definition) 138 

FilenameU Field 109 

File, Creating or Adding Records to 

(by DAM) 92 

File, Example of an Organized (by ISFMS) 103 

File, Load or Extend (by ISFMS) 105 

First Control Section......... 22 

FIXBLK (DTFIS RECFORM) 163 

FIXBLK (DTFSR RECFORM) 149 

Fixed-Length Records (for Consecutive) 72,78 

Fixed-Length Records (for ISFMS) 96 

Fixed-Length Records (for DAM) • 156 

Fixed-Point Constant, Scale Modifier for 37 

Fixed-Point Constants - F and H 37,40 

FIXUNB (DTFDA RECFORM) 156 

FIXUNB (DTFIS RECFORM) 163 

FIXUNB (DTFSR RECFORM)......... 148 

Floating-Point Constant, Scale 

Modifier for.... 37 

Floating-Point Constants - E and D....37,41 

Forced End-of- Volume (Tape)... 134 

Forcing Alignment (DS Statement) 45 

Format-1 : Standard File Label 63 

Format-2: Standard File Label 64 

Format-3: Standard File Label 64 

Formats, Machine-Instruction 31,212 

Formats, Standard File Label (Disk).... 63 

Format, Constant Specifying..... 38 

Format, Keyword (Macro) 54 

Format, Literal 17 

Format, Macro Instruction 54 

Format, Positional (Macro) . ... 54 

Format, Statement 8 

Format, Statement (Summary of) . ... 11 

FORWARD (DTFSR READ) 148 

FSF (Forward Space to Tape Mark) 83,85 

FSR (Forward Space to Interrecord Gap) 83,85 

General Restrictions on Symbols 13 

Generate Transfer Card — XFR 50 

GET Macro 75,111 



HDR1, HDR2, etc. (Tape Label 

Identifier).. 65 

Header Card, File Definition 

Macro Instruction 138 

HEADER (DTFSR) 146 

Hexadecimal Constant — X 39 

Hexadecimal Digits 14 

Hexadecimal Self-Defining Term 14,42 



IBM 2311 Disk Storage Drive, CNTRL 

Macro for 86 

IBM 1285 Optical Reader, CNTRL for 86 

IBM 1442 or 2520 Card Read-Punch, 

CNTRL for 86 

IBM 2540 Card Read-Punch, CNTRL for.... 85 

IBM 1052 Printer-Keyboard 181 

ICTL - Input Format Control 48,211 

ID- Verification .........59,117,118 

Identification - Sequence Field 11 

IDIAL Macro, for BSC Support 117,252 

IDLOC (DTFDA) 91,154 

IDNAME (DTFIS) 110 

ID, Record (DTFIS) 106,111 

ID, Record Reference After (for DAM). .92, 94 
ID, Record Reference by (for DAM) . 91 , 93, 154 

IGNORE (DTFSR ERROPT) 146 

TLIDEX (DTFIS) 161 

Imperative Macro Instruction. ........ 60, 252 

Implied Address 20,30 

INAREA (DTFSR) 79,146 

INBLKSZ (DTFSR) 147 

Independent Overflow Area (ISFMS) 103 

Indexed Sequential File 

Management System (ISFMS) ... 58, 96, 138, 158 

Indices (for ISFMS) .. 97 

Initialization 63 

Input Area, Processing Records in the.. 76 

Input File, Disk 67, 133, 145 

Input File, Tape. ..69, 133, 136, 142, 145 

Input Format Control — ICTL 48 

INPUT (DTFDA TYPEFLE) 157 

INPUT (DTFPH TYPEFLE) 173 

INPUT (DTFSR TYPEFLE) 150 

Input Seguence Checking ' — ISEQ 49 

Input/Output Control Macros 55 

INQ (DTFSN) 115 

Inserting Records (ISFMS) 102 

Instruction, Base Register 20 

Instruction, Symbol Definition (EQU) . . . 34 
Instruction Alignment and Checking..... 29 

Instructions, Assembler 34 

Instructions, Data Definition. .34,35 

Instructions, Listing Control 34,46 

Instructions, Machine •••• 29 

Instructions, Macro 53 

Instructions, Program Control... 34,48 

Interruption Handling 21, 173, 182 

Interval Timer 180 

Invalid Symbol's 13 

I0AREA1 (DTFDA) 94,155 

IOAREA1 (DTFSR) ...79, 142, 146 

IOAREA2 (DTFSR) 142,146 

IOAREAL (DTFIS) 96,16 1 

IOAREAR (DTFIS) 96,161 

IOAREAS (DTFIS) 96,111,161 

IOCFG Macro , 186 

IOCS Example (Appendix G) 224 

IOCS, Channel Configuration 

Supported by 56,186 

IOCS, I/O Units Handled by..... 55 

IOCS, Logical and Physical 56 

IOREG (DTFIS) 96, 161 

IOREG (DTFSR) 76,78, 147 
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IOROUT (DTFIS) . 105, 107, 109, 162 

IPL (Initial Program Loader).,... 188 

I/O Areas for Consecutive 75,76,146 

I/O Areas for DAM t .. 88 

I/O Areas for ISFHS 96,111,161 

I/O Assembly — Summary 234 

I/O Configuration (IOCFG) 186 

I/O Reguests 173 

I/O Units Handled by IOCS 55 

ISEQ - Input Seguence Checking .... 1 1 ,49, 2 1 1 
ISFMS (Indexed Seguential File 

Management System) 58,96, 138, 158 

JBCTL Macro 191 

Job Control ASSGN Card 144 

Job Control DLAB Card 67 

Job Control Program 130 

Job Control RSTRT Card 131 

Job Control TPLAB Card 70 

Job Control VOL Card 67,69 

Job Control XTENT Card ...67, 144, 157, 158 

Job-Control- Assembly Macros 190,191 

KEY (DTFIS) 108, 1 10 

Key, Record Reference by 

(for DAM) 93,94, 155 

Key, Record Reference by (for ISFMS)... 94 

Key Area for DAM 89 

Key Area for ISFMS.. 96 

Key Field in Main Storage (for DAM) 89,93 

Key Field in Main Storage 

(for ISFMS) 96, 102 

Key Field within a Record 

(for ISFMS) 96, 102 

Key Length, Maximum (for DAM) 89 

KEYARG (DTFDA) 93, 155 

KEYARG (DTFIS) 108,162 

KEY! EN (DTFDA) 89,94, 155 

KEYLEN (DTFIS) 96,99,163 

KEYLOC (DTFIS) 96, 107, 163 

Keypunch Instructions (Coding Form).... 8 
Keyword Format 54,137,184 

LABADDR (DTFDA Label Address) 155 

LABADDR (DTFPH Label Address) 172 

LABADDR (DTFSR Label Address) 148 

Label Formats, Standard File (Disk).... 63 

Label Return (LBRET Macro) 71 

Labels, Disk... 63 

Labels, Nonstandard (Tape) 65,69,70,134 

Labels, Standard Tape 65,69,70, 133, 148 

Labels, User-Standard {Tape) . . 65, 7 1 , 136, 172 
Labels, User-Standard 

File (Disk). 64,68,71, 172 

LBRET Macro 71,136,172 

LENGTH (DTFBS) 167 

LENGTH (DTFSN) 165 

Length Attribute. 16,29,37 

Length Attribute Reference of a Symbol. 16 

Length Modifier for Constants 37 

Lengths - Explicit and Implied, 

Machine- Instructions. 30 

Letters 10 

Limits, File (Disk) 63 



Link, Seguence (in Overflow Records 

by ISFMS) 101 

Linkage Editor 27,49 

Linkage Field for Indices ... 97 

Linkages, Symbolic... 26 

Linking. 6, 23, 26 

Listing Control Instructions 34,46 

Literal Definitions 36 

Literal Format 16 

Literal Pool 16,50 

Literals. 15 

LOAD (DTFIS IOROUT) 105,162 

Load or Extend a Disk File by ISFMS. 105, 158 
Location Assignment, Control Section... 24 

Location Assignment, Dummy Section 25 

Location Counter 15,23,35,38,44,45,50 

Location Counter Reference.... 15 

Logical IOCS (vs Physical IOCS) 56 

Logical Record 56 

LTORG - Begin Literal Pool ..50,211 



Machine Check 173 

Machine Instruction Examples 31 

Machine Instruction Formats 31,212 

Machine Instruction Statements 29,31 

Machine Instructions, Lengths - 

Explicit and Implied 30 

Machine Instructions, Operand Fields 

and Subfields 29 

Machine Instructions 29,31 

Machine Language 5 

Machine Reguireraents 7 

Machine-Instruction Mnemonic Codes . . . 3 1 , 20 3 

Macro, Assembly of the 55 

Macro Definition Header 53 

Macro Definition Language 53 

Macro Instruction Format 54 

Macro Instruction Statements 53,252 

Macro Instructions 59,252 

Macro Instructions for Random Retrieval 

by ISFMS 108 

Macro Instructions for Seguential 

Retrieval by ISFMS 109 

Macro Instructions to Add Records to 

a File by ISFMS 107 

Macro Instructions to Assemble a 

Supervisor 182, 183 

Macro Instructions to Toad, Extend Disk 

Files by ISFMS 105 

Macro Library 53 

Macro System 53 

Macros, File Definition 54,59 

Macros, Input-Output Control 55 

Macros, Job-Control-Assembly 190 

Macros, Supervisor-Assembly 5U, 182 

Macros, Super vis or -Communication 54, 1 73 

Magnetic Tape Units, CNTRL for 83 

MANDEX (DTFIS) 105,163 

Master Index 97, 101, 106, 163 

Message (MSG) 174, 175 

Methods of Reference for DAM 89 

Mnemonic Operation Codes 5, 10,31,32,203 

Model Statements 53 

Modifiers for Constants... 37 

MOUNTD (DTFPH) - 67,172 

MSG Macro 174, 175 



Index 271 



MSTIND (DTFIS) 101, 163 

Multifile Reels 70 

Multiple Tracks, Search (DAM) ..... 89,93, 157 

Multiterm Expression 16 

MVCOM Macro 174,178 

Name Entries 10 

Name Field, Macro Instruction 54 

Naming Control Sections.... 25, 105, 109 

NEWKEY (Write Macro for ISFMS) 106,107 

NO (DTFSR FILABL) 146 

Noise Record 75 

Nonstandard Tape Labels 65,69,70, 134 

NORHD (DTFSR REWIND).... 149 

NRECDS (DTFIS) 96,163 

NSTD (DTFSR FILABL) * 146 

Numeric Digits.... 10 

Object Program.. 5,55 

OFFLINE (DTFSR) 148 

OPEN Macro 66 

Opening a Closed File 135 

Operand 5 

Operand Entries 10,35 

Operand Field, Macro Instruction 54 

Operand Fields and Subfields, Machine 

Instructions 29 

Operand Subf ield 1 : Duplication Factor 

(Constants)... 36 

Operand Subfield 2: Type (Constants).. 36 
Operand Subfield 3: Modifiers 

(Constants) 36 

Operand Subfield 4: Constant 

(Constants) 38 

Operation Codes, Mnemonic* 5,10 

Operation Entries 10 

Operation Field, Macro Instruction 54 

Operator Communication ...56,175,181 

Optical Reader (IBM 1285 and 1287), 

CNTRL for 86 

ORG - Set Location Counter.... 50,211 

Organization of Records on Disk 

(for ISFMS) 96 

Organization to Assemble a , Super visor. . 188 

Organized File, Example of (ISFMS) 103 

Other Files, CLOSE for 136 

OUAREA (DTFSR) 79, 148 

OUBLKSZ (DTFSR) 148 

OUTPUT (DTFDA TYPEFLE) 157 

OUTPUT (DTFPH TYPEFLE) 173 

OUTPUT (DTFSR TYPEFLE) 150 

Output Area, Building Records in the 

(Consecutive) 77 

Output File, Disk 68, 133, 147 

Output File, Tape 69, 134, 136 

Overflow, Printer 88 

Overflow Area, Cylinder (ISFMS) 103 

Overflow Area (for ISFMS) 101,107 

Overflow Area, Independent (ISFMS) 103 

Overflow Area Option (ISFMS) 103 

OVLAY (DTFEN Card) 138 



Packed Format, Decimal Constant 42 

Paper Tape Reader, IBM 2671 76 

Parameter Values 53 

Parameters 53, 137 

Parity Error Retries 145 

Patch Area in Supervisor 187 

Physical IOCS, CLOSE for 135 

Physical IOCS, File Definition Macro. 60, 171 

Physical IOCS, OPEN for 67 

Physical IOCS, Processing 

Records with 124, 132, 171 

Physical IOCS Macros 124, 137, 171 

Physical IOCS vs Logical IOCS 56 

Physical Tape Record Size 75 

Positional Format.. 54 

Preface 2 

PREP (DTFSN) 115 

Previously Defined Symbols 14 

Prime Data Area (ISFMS) 9 6 

PRINT - Print Optional Data 47,211 

PRINTER (DTFSR DEVICE) 145 

Printer Carriage Control 79 

Printer Control, Punch and.. 79 

Printer Overflow 87 

Printer Record Maximum Size 75 

Printer- Keyboard Record, Maximum Size.. 75 

Printers, CNTRL for 85 

PRINTOV (DTFSR) 87,148 

Processing, Types of 57 

Processing Disk Records by the Direct 

Access Method 88, 138, 151 

Processing Disk Records 

by ISFMS 58,96, 138, 158 

Processing Records Consecutively 71,138 

Processing Records in a Work Area 

(Consecutive) 75 

Processing Records in the Input Area 

(Consecutive) 75 

Processing Records in Random Order 

by DAM 88 

Processing Records in Random Order 

by ISFMS 96, 108, 164 

Processing Records in Seguential Order 

by ISFMS 96, 109, 164 

Processing Records with 

Physical IOCS 124,171 

Processing with STR Devices. .59, 1 1 2, 138, 165 

Program, Object 5 

Program, Source 5 

Program Check 173,180 

Program Control Instructions 48 

Program Listings 6 

Program Sectioning and Linking.. 23 

Program Statements 5 

Programmer Aids 6 

Programming with the USING Instruction. 22 

Prototype Statement. 53 

PRTOV Macro 87 

PTAPERD (DTFSR DEVICE) 145 

PUNCH - Punch a Card 49,211 

Punch and Printer Control 79 

PUT Macro 77,88, 11 1 
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Quote 15,38 



RANDOM (DTFIS TYPEFLE) 164 

RANDOM (DTFIS UPDATE) 164 

Random Processing by DAM 58 

Random Processing by ISFMS 96 

Random Retrieval by ISFMS, Macro 

Instructions for 108 

RANSEQ (DTFIS TYPEFLE) 164 

RANSEQ (DTFIS UPDATE) 164 

RDLNE Macro 81 

READ (DTFSR) 148 

READ01 (DTFSR DEVICE) 145 

READ20 (DTFSR DEVICE) 145 

READ40 (DTFSR DEVICE) 145 

READ42 (DTFSR DEVICE).. 145 

READ85 (DTFSR DEVICE) 145 

READ 87D Document Processing (1287).... 145 
READ 87T Journal Tape Processing (1287) 145 

Read Backwards, Tape.. 77, 132, 147 

READ Macro 81,93,108 

READ Macro, for BSC Support (DTFBS) . 121,253 
READ Macro, for STR Devices (DTFSN) . . 59, 1 14 

READID (DTFDA) 93,156 

READKB.... 86 

READKEY (DTFDA) 93,156 

RECFORM (DTFDA)... 89,156 

RECFORM (DTFIS) 96,107,163 

RECFORM (DTFSR). 148 

Record, Key Field within a 

(for ISFMS)...... 97,102 

Record 0 for Capacity-Record Option.... 95 

Record ID (DTFIS).... 106,111 

Record Length (Tape) 72 

Record Reference: After 

(for DAM) 92,95,152 

Record Reference: After ID (for DAM).. 92 

Record Reference (for DAM) 58,93,94 

Record Reference by ID 

(for DAM) 92,93,94,155 

Record Reference by Key 

(for DAM) 92,93,94, 155 

Record Sizes... 75 

Record Types for Consecutive 

Processing 72,73 

Record Types for DAM.. 89,156 

Record Types for ISFMS.- ...96,163 

Records, Adding to a File (by DAM) . . . 92, 152 
Records, Adding to a File 

(by ISFMS),.. 102, 107,158 

Records, Blocked (for 

Consecutive) 72,77,78,149 

Records, Blocked (for DAM) 89,156 

Records, Blocked (for 

ISFMS) 106, 107, 11 1,163 

Records, Disk Indices for (for ISFMS) . . 99 
Records, Fixed-Length (for 

Consecutive) 72,77,78, 149 

Records, Fixed-Length (for DAM) 89,156 

Records, Fixed-Length (for ISFMS) .... 97, 163 
Records, Processing in Random 

Order by DAM 89,138 

Records, Processing in Random 

Order by ISFMS 96, 108, 161, 162 

Records, Processing in Seguential 

Order by ISFMS 96, 109, 161 



Records, Unblocked (for 

Consecutive) . 72 , 75 , 76 ,78, 1 49 

Records, Unblocked (for DAM) 89,156 

Records, Unblocked (for ISFMS) .. 106 , 1 1 1 , 1 63 
Records, Undefined (for 

Consecutive) 72,75^77,79, 149 

Records, Undefined (for DAM) 90,155 

Records, Variable-Length 

(for Consecutive) 72,75,77,78, 149 

Records, Variable-Length (for DAM) . . . 90, 156 
Records on Disk, Organizations of 

(for ISFMS) 97 

RECSIZE (DTFDA) 89,156 

RECSIZE (DTFIS) 163 

RECSIZE (DTFSR) 72,79, 149 

Reference, Record (for DAM) 89,93,94 

Reference, Track (for DAM) . . 89 ,9 1 , 93 , 94, 156 

Reference by ID (for DAM). 93,94, 155 

Reference by Key (for DAM) 93,94, 155 

Reference Card (File Definition) 138 

Reference Methods for DAM 89,93,94 

Register Usage 20,147 

Register Zero 22 

Relationships 6 

Relative Addressing 23 

Relocatability 6 

Relocatable Expressions 18,43 

Relocatable Library 194 

Relocatable Terms . .... 12 

Relocation Dictionary (RLD) 192 

RELSE Macro 80 

Reopening a Closed File 135 

REP -{SEND Macro) 187 

REPLY (MSG Macro) 175 

REPRO — Reproduce Following Car d ...... 49, 2 1 1 

RESCN Macro 82 

Restrictions on Registers 20 

Restrictions on Symbols 14 

Retrieve Records Randomly by ISFMS 108 

Retrieve Records Seguentially by ISFMS. 109 

RETRVE (DTFIS IOROUT) 162 

RE W (Rewind Tape) 83 

REWIND (DTFSR) 135, 136, 149 

Rewind and Unload Tape (RUN) 83 

Rewind Tape (REW) 83 

RR Format 31,212 

RS -Format .32,212 

RSTRT (Job Control Card) 131 

RSTRT Macro 191 

RTRVEX (DTFIS) , 108,163 

RUN (Rewind and Unload Tape). 83 

RX Format 32,212 

RZERO (DTFDA) 95 



S-Type Address Constant 43 

SAVEREG (SUPVR) 175,184 

Scale Modifier for Constants 37 

Scale Modifier for Fixed-Point 

Constant 37 

Scale Modifier for Floating-Point 

Constant 37 

SCLOS Macro, for STR Devices ...62,116 

Search Multiple Tracks (DAM) 89,91,93, 157 

Sectioning and Linking.*.. 6,23 

Section One - Introduction 5 

Section Three - Instructions 29 
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Section Two - General Information 8 

SEEKADR (DTFDA) 95,156 

Select Stacker (SS) 86 

Self-Defining Term, Binary 14 

Self-Defining Term, Decimal 14 

Self-Defining Term, Character 15 

Self-Defining Term, Hexadecimal. 14,42 

Self-Defining Terms 14 

Self-Defining Terms, Using 14 

SEND Macro 187 

SEQNTL (DTFIS TYPEFLE) 164 

SEQNTL (DTFIS UPDATE) 164 

Seguence Check (by ISFMS) 108 

Seguence-Link Field in Overflow 

Records (ISFMS).... 102 

Sequential Processing by ISFMS. ... 59 , 96, 109 
Sequential Retrieval by ISFMS, Macro 

Instructions for 109 

Set Exit (STXIT Macro) 174,179 

Set Limit (SETL) 110 

Set Location Counter — ORG 50 

SETFL Macro 105 

SETL Macro ...110,163 

Seven-Track Tape... 77,192 

SI Format. 32,212 

Simultaneous Read-While-Write Tape 

Control Units , 87 

SINGLE (DTFPH MOUNTD) 67,68,172 

SINGLE Term Expression 16 

Sizes of Records 75 

SK (Skip to Carriage-Tape Channel) 85 

SKIP (DTFSR ERROPT) 146 

SOPEN Macro, for STR Devices 62,112 

Source Program 5 

Source Statements.. 5,11 

SP (Carriage Space) 85 

SPACE - Space Listing 47,211 

Special Characters 11 

Special Addressing Consideration 51 

Special Uses of the Duplication Factor 

(DS Statement) 45 

SQCHEX (DTFIS) , 106,164 

SRCHM (DTFDA) 155,157 

SS (Select Stacker). 86 

SS Format 32,212 

SSD 86 

Stacker Selection ...86,87 

Standard File Label Formats (Disk) 63 

Standard Labels, User-Written 

(Tape) 133, 136 

Standard Tape Labels 65,69,70,133 

Standard Volume Labels (Disk) 63,68 

START - Start Assembly.. 24,191,211 

Start New Page — EJECT 47 

Statement Format 8,11 

Statement Boundaries 8 

Statement Example 10 

Statements, Assembler Instruction 5 

Statements, Assembler-Language 5 

Statements, Machine Instruction 5,-29 

Statements, Macro Instruction 53 

Statements, Program 5 

Statements, Source 5 

STD (DTFSR FTLABLE) 146 

Storage Area for Consecutive Processing 75 

Storage Areas for ISFMS .96, 106, 109 

Storage Areas for DAM 89 

Storage, Reserving 44 



STR , Expanded CCB 165 

STR, File Definition Macros... 112 

STR, Imperative Macros 60,112 

STR, Processing with.. 59, 112, 138, 165 

Structure, Assembler Language... 11 

STXIT Macro 174,179 

Subset Relationships, Assembler 

Language 195 

Summary of Statement Format... 11 

Supervisor 13,56, 176 

Supervisor Call 173 

Supervisor End (SEND Macro) 187 

Supervisor Interruption Routine.. 176 

Supervisor, Organization to Assemble... 188 

Supervisor Patch Area 187 

Supervisor-Communication Macros * 54, 173 

Supervisor-Assembly Macros 54, 182, 183 

SUPVR Macro 13,184 

Symbol Definition Instruction (EQU) . . . . 34 

Symbol Length Attribute Reference 16 

Symbol Table 13 

Symbol Value * 13,15,35 

Symbolic Language 5 

Symbolic Linkages 26 

Symbolic Units (SYMUN Macro) 185 

Symbols 10, 13,24 

Symbols, Defining 13 

Symbols, General Restrictions on 14 

Symbols, Previously Defined 14 

SYMUN Macro 139, 185 

SYS000-SYS254 144, 157, 171 , 173, 1 85 

SYSIPT 144, 157, 171 , 173, 185 

SYSLOG 1 44, 157, 173, 176, 185 

SYSLST 144, 157, 173, 185 

SYSOPT 144, 157, 171, 173, 185 

SYSRDR 14 4, 157, 173, 185 



Tape (DTFSR DEVICE) 145 

Tape, Seven-Track 77 

Tape, Write Blank (ERG). 83 

Tape Control Units, Simultaneous 

Read-While-Write 87 

Tape File, Reopening a 135 

Tape Files, Unlabeled 66,135 

Tape Input File 69, 133, 136, 142, 145 

Tape Labels, Nonstandard 65,69,70, 134 

Tape Labels, Standard 65, 69,70, 133, 172 

Tape Movement Functions 83 

Tape Output File 69, 134, 136 

Tape Record, Minimum and Maximum Sizes. 75 

Tape Units, CNTRL for 83 

TEL (DTFSN) 115 

Term, Binary Self-Defining 14 

Term, Character Self-Defining... 15 

Term, Decimal Self-Defining... 14 

Term, Hexadecimal Self-Defining. .14 

Terms 13,14 

Terms, Absolute 14 

Terms, Literal 16 

Terms, Relocatable 13,18 

Terms, Self-Defining 14 

Terms and Expressions 13 

Timer, Interval 180 

TIMER (SUPVR Macro) 180 

TITLE - Identify Assembly Output 46,211 

TPLAB (Job Control Card) 70 

TPMARK (DTFSR) 149 
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TR (EXIT Macro) 175 

TR (SUPVR Macro) 184 

Track Index (ISFMS) * 99,105 

Track Reference Field (DAM) ..91,156 

Track Reference (for DAM) 58,91 

TRANS (DTFSR) 149 

Transient Area 182 

Translation Table, Code 150 

TRUNC Macro (Truncate) 80,150 

Truncate — TRUNC 80 

TRUNCS (DTFSR) 80, 150 

Type Specifications for Constants...... 36 

TYPEFLE (DTFDA) 157 

TYPEFLE (DTFIS) 108,164 

TYPEFLE (DTFPH) 172 

TYPEFLE (DTFSR) 150 

Types of Processing 57 

Types of Records for Consecutive 

Processing 72 

Types of Records for DAM 89,156 

Types of Records for ISFMS 96,163 



UHI1, UHL2, etc. (Label Identif ier) . . 64 , 6 9 
Unblocked Records (for 

Consecutive) 72,75,76,78, 149 

Unblocked Records (for DAM) 89,156 

Unblocked Records (for ISFMS) 111,163 

UNDEF (DTFDA RECFORM) 156 

UNDEF (DTFSR RECFORM) 149 

Undefined Records (for 

Consecutive) .72,75,79,149 

Undefined Records (for DAM) 89,155 

Universal Character Set 150 

Unlabelled Tape Files.. 66,135 

UNLOAD (DTFSR REWIND) 149 

Unnamed Control Section 25 

UPDATE (DTFIS) 108, 109, 164 

UPDATE (DTFSR) 79,150 

Updating 79 

User Trailer Labels for Disk 133 

User-Standard File Labels 

(Disk) 64,68,71,172 

User-Standard labels (Tape) . . . 65, 7 1 , 136, 1 72 
USING - Use Base Address 

Register 20,21,43,21 1 

USING Instruction, Programming with... 20, 22 

Using Self-Defining Terms 1.4 

UTL0, UTL1, etc. (Label Identif ier) . 64, 133 



V-Type Address Constant 27,44 

Value, Expression 18,43 

VARBLD (DTFSR) 79, 151 

VARBLK (DTFSR RECFORM) 149 



Variable-Length Records (for 

Consecutive) 72,75,78, 149 

Variable-Length Records (for DAM) . . . . 89, 156 

Variety in Data Representation 6 

VARUNB (DTFSR RECFORM) * 149 

VERIFY (DTFDA) 157 

VERIFY (DTFIS) 164 

VERIFY (DTFSR) 151 

V0L2, VOL3, etc. (Label Identifier)... 63 
V0L1, VOL2, etc. (Label Identifier)... 65 

VOL (Job Control Card) ...67,69 

Volume Labels (Disk) 63 

Volume Table of Contents (VTOC) 63 

VTOC 63 



WAIT Macro 112, 129 

WAITF Macro ..58,81,95 

WAITM Macro 62,112,129 

WLRERR (DTFIS) 164 

WLRERR (DTFSR). ■ 151 

Work Area, Building Records in a 

(Consecutive) 76 

Work Area for Consecutive 75,76, 151 

Work Area for ISFMS 111,164 

Work Area, Processing Records in a 

(Consecutive) 151 

WORKA (DTFSR)...- ..147,151 

WORKL (DTFIS) 96, 106, 164 

WORKR (DTFIS) ...96,165 

WORKS (DTFIS) 96, 165 

WRITE Macro . 9 4, 1 06, 1 07, 1 08 

WRITE Macro, for BSC Support 

(DTFBS) 122,253 

WRITE Macro, for STR Devices ( DTFSN) . . . 115 

Write Tape Mark (WTM) 83 

WRTTEID (DTFDA) 94, 152, 157 

WRITEKY (DTFDA) 157 

Writing Checkpoint Records.... 130 

Writing User-Standard Header 

Labels (Disk) . 68 

Wrong-Length Record 151 

WTM (Write Tape Mark) 83 



XFR - Generate a Transfer Card 50,211 

XTENT (Job Control 

Card) 67,99, 105, 133, 144, 157, 158 

XTNTXIT (DTFDA) 157 

XTNTXIT (DTFPH) 173 
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